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Sehr geehrte Atarianer/innen, 


Wlf beglückwünschen bis zum Kuuf von 'Ataripower'. Wir wollen uns 
hu lauge Biit sinea* Vorwort q« a. sufhsltsn, da dies nur Platz 
Kostet, der sinnvoller genutzt werden kann. Sie werden sich 


sicher über 


iie Aufmachung des Buches wundern. Aber aus 

diesem Schritt 


ftlleben 

br undsn r^ahe 

n wir 

uns 

n. Wir 

sahen uns zu 

dieser 

Ent sc 

k I cz.r war 

7 ua-'b ddb DUC 

h nicht 

mehr- 
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Ein riuhti ges Buch , in K1 ein ser ie gsdruckt und gebunden , 
siHc-n rr sis von js y.—Dn» Dicse 3 = — Dli wollten wir nicht an 
Sie weiter geben. Wir nehmen an, dass di : es mit Ihrem 
Ein v er ==■ L®r da * i ss g esc herien ist. Z txo egsDen , * At ar i po^sr ' als ech t es 

Bucn sähe zwar besser aus, mehr drinstehen würde dort allerdings 
lischt. dem auch sei, wir wünschen Ihnen mit diesem 

Buch viele interessante Stunden. Und ganz sicher werden Ihre 
a 3 g t amme na<_ii dsii» ütudiUi” von Atiaripower professionelIer sein* 
Wir', dass sind übrigens die Betreiber des Atari Club Düsseldorf. 
Die Bauen 1 eitun’gen für ein Cassetteninter-face und für den Light- 
P=fii — ind aufgrund technischer Probleme nicht, wie in der Werbung 
angekundigt, enthalten. Sie werden aber an alle Käufer kostenlos 
nachgeliefert. Wir bitten um Ihr Verstände!ss. 

So, jetzt aber los. Aber zuvor noch einige wichtige 
inf of inationsn« Sämtliche hier auf geführten Programme, haben 
bemucharakter. Sie werden hier keine fertigen Spiele o.ä. finden. 
Die müssen Sie schon selbst schreiben. Jedes dieser Programme ist 
dafür gedacht, in andere bereits bestehende Programme eingefügt 
oder in ein noch zu schreibendes Programm eingeplsnt zu werden» 
Sie sollten hierbei vorsichtig Vorgehen, Meistens werden 




Maschinenunterrautinen verwendet. Die notwendigen Daten hierzu 
stehen immer in DATA Zeilen. Sie dürfen sich dort nicht 
vertippen, sonst ist das Programm verloren. Deshalb die Regel, die 
Sie immer beherzigen müssen ; Erst speichern dann starten. Wenn 
sich der Atari jetzt aufhängt, kann das Programm neu geladen und 
der Fehler gesucht werden. 

Wie sie als Fortgeschrittener sicher bald sehen werden, liegen 
viele liaschinenunterroutinen in der Page 6 (1536-1796 des.) . Wenn 
Sie diese Unterroutinen miteinander kombinieren möchten, müssen 
sie diese an eine andere Stelle verlegen. Bei einem 


chträglichem Einbau 

in b 

erei ts 

stehende 

Ot" sr 

i s wy: 

amme x st dot c 

prüt an f ob die 

P 8.QS 

h noch 

frei 

ist« 

Die 

Page 6 ist sin 

ei cbi er □ er ex ch ? dan 

der 

Computer 

bei 

nor 

malern 

Betrieb nicht 


anrührt. Dies ist so ziemlich dar einzige Platz, der gegen 
überSchreibung sicher ist. Da der Atari keine feste 

Speicherbelegung hat, sondern seinen Bildspeicher usw. je nach 
Bedarf hin- und herschiebt, sollte man die Page 6 erstmal 

ausnutzen. Falls dieser PI atz nicht reicht, kann man den Atari 
überlisten und somit festen Speicherplatz schaffen. Um dies zu 
machen, gehen Sie so vor: 

Im Computer gibt es eine Speicherzelle, die dem 03 mitteilt, 
wieviel Beiten (eine Seite sind 256 Byte) ihm zur Verfügung 
stehen. Zieht man von dieser Zahl nun 4 ab und schreibt diese 

wieder-.in die Zelle hinein, so steht nun 1K RAM zur Verfügung, der 

nicht gelöscht wird. Das-Ganze sieht als Programm so auss 
10 X=PEEK(i06>: POKE 106,X-4: ANFANG=PEEK(106)*256 

In der Variable ANFANG steht nun die Anfangsadrasse des 
geschaffenen Freiraumes. Allerdings steht nach einer solchen 
Prozedur natürlich 1K RAM weniger zur Verfügung. 

Kleine Routinen lassen sich auch sehr gut in einem String 


unterbringen 




Dies geht aber nur, wann das Maschinenprogramm mittels USR 
aufger ufan wird« Diese Methode ist sehr elegant und spart eine 
Mange DATA's. Man geht dabei so vors 

10 DIM MASCHA(X): FQR A=1 TO X: READ DATENs MASCHA(A,A)=CHR$(DATEN) 
: NEXT A 

X ist hierbei die Anzahl der vorhandenen Daten. Mach Aufruf 
dieser Zeile stehen die benötigten Daten in dem String MASCHF. 
Das Masch 3. nenpr ogr amm wird nun mit dem Kommando 

X=USRCADR(MASCHA)> aufgerufen. Mit dieser Methode spart man 
gegenüber der DA! A Methode bei 1000 Daten etwa d000 3y'te ein. 

Audi hierbei gilt, wie auch sonst überall s Durch probieren ver 
steht ffan a.m schnellsten. 

Nun noch ein Hinweis s 

OÜililiiLiic Dr ULKTtfiila blHu bsöbSi t_il i-i y t , da di.SSSS BUCH SUCh StwaS 

für Leute bieten soll, die nur nach Fehlern suchen. 

Bei fehlerhaften Programmen oder sonstigen Fehlern bitten wir um 

Nachricht ans 

A-. Mül ler 

Karlstr.il 

~r3\ 3 D Düsseldorf 

Aber bitte nur schriftlich ? 


• Ein neuer, blinkender Cursor 

Wer wollte nicht schon immer mal einen neuen Cursor haben. Hier 
ist nun ein Senerierungsprogramm für einen blinkenden Cursor, der 
jede gewünschte Farbe annehmen kann. Ab Zeile 409 stehen 4 DATA 
Zeilen für 4 verschiedene Cursorfigursn. Sie können nur eine 
Zeile sinsetzen. Die anderen müssen weggelassen werden. Der 
Cursor wird so gemacht, wie Sie es im Player Missile Kurs gelernt 
haben. Achten Sie nur darauf, dass die ersten 4 Spalten nicht 
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yenuti«tri usn \j. ,^ = ^,3^ . Der Cursor wird aus dem Player 2 
hergestellt. Der Cursor wird mit POKE 752,1 eingeschaltet. Bei 
7wi,0 wird der normale Atari Cursor eingeschaltet. Das 
Programm generiert sine sichere Zone, indem es 33 Pages vom RAMTOP 
üUütr dhisrt. Dies kostet natürlich Speicherplatz. Wenn nur 
i_>i «3 heiiuLit wird, kann dis 33 in der Zeile 173 su einer 6 

geändert werden. Nun steht mehr RAM zur Verfügung. 

10 GOSÜB 160 
20 POKE 82,0 

30 FDR Z=0 TO 180:READ AsPOKE X+Z.A 

40 POSITION 26,5:? X+Z;:NEXT Z:POKE 752,0:? 

50 POKE 752,1 schaltet unseren Cursor ein" 

o 752,0 schaltet den Atari Cursor ein" 

70 . Bib Blinkgeschwindigkeit ein (1-64) "::TRAP 70 -TNPirr t 
S 0 IF Kl OR I>64 THEN 70 , - ' Kfth 70. INPUT I 

90 POKE X+55,I 

100 ? :? "Welche Cursorfarbe (0-255) ";:TRAP 100:INPUT FARBF 
110 IF FARBE<1 OR FARBE>255 THEN 100 100.1NFUT FARBE 

120 POKE X+74,FARBE 

yer 2)" ? " Ac:htun9! Diese Routine benuetzt PAGE 6 als P/M RAM (Pia 

140 Y=USR(X) 

150 POKE 752,1:END 

160 GRAPHICS 0:POKE 752,1:POKE 82,1:POKE 83,39 
170 X=(PEEK(106)-33)*256 ’ 

180 RETURN 

190 DATA 104,165,212,24,105,36,133,212 
200 DATA 165,213,105,0,133,213,162,7 
210 DATA 160,144,177,212,157,0,6,136 
220 DATA 202,16,247,164,212,166,213,169 
230 DATA 7,76,92,228,173,240,2,240 
240 DATA 124,173,43,2,240,4,169,0 
250 DATA 240,6,173,8,6,24,105,8 
260 DATA 141,8,6,48,104,160,255,169 
270 DATA 0,153,0,6,136,192,8,208 
280 DATA 248,169,10,141,194,2,141,20 
290 DATA 208,169,1,141,111,2,141,27 
300 DATA 208,169,0,141,10,208,169,0 
310 DATA 141,7,212,169,2,141,29,20B 
320 DATA 169,58,141,47,2,141,0,212 
330 BATA 166,85,164,84,165,87,13,147 
340 DATA 2,240,12,173,191,2,201,4 
350 DATA 208,35,152,24,105,20,168,138 
360 DATA 10,10,105,48,141,2,208,152 
370 DATA 10,10,10,105,39,168,162,7 
380 DATA 189,0,6,153,0,6,136,202 
390 DATA 16,246,76,98,228,169,0,141 
400 DATA 2,208,76,98,228 

409 REM Normaler Cursor 

410 DATA 240,240,240,240,240,240,240,240 

419 REM Fenster 

420 DATA 240,144,144,144,144,144,144,240 

429 REM Punkt 

430 DATA 0,0,0,0,0,0,0,96 

439 REM Dreieck 

440 DATA 0,64,32,16,16,32,64,0 
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Neustart bei RESET 

Um ein Basicprogramm zu schützen, muss es erstmal gegen die 
Unterbrechung von BREAK und RESET Tasten gesichert werden. Wie 
die BREAK Taste ausg'eschal tet werden kann, steht an anderer 
Stelle in diesem Buch. Um die RESET Taste auszuschalten, müssen 
die folgenden Programmzeilen an den Anfang des Programms gesetzt 
werden. Nach Brücken von RESET startet das Basicprogramm, als 
wäre RUN eingegeben worden. 

10 FOR A-1536 TO 1583s READ Bs PORE A,B: NEXT A 
20 POKE 12,0: PORE 13,6: PORE 9,2 

30 DATA 160,240, ISS,47,5,143,83,200,208,248,149,13,141,74,3,169,0 
40 DATA 169,6,133,3,169,2,133,9,76,0,160,0,0,0,4s,47, 43,37 

50 DATA 24,20,18,12,17,18,26,50,53,46,0 


Graphics 8 mit Braphics 0 mischen 

Ner wollte nicht schon immer mal ein Graphics 8 Fenster mit 
Graphics 3 Zeichen füllen. Aus dem Basic ist dies ohne 

Unterstützung von Maschinensprache nur langsam möglich. Man liest 
die Daten des darzustellenden Zeichens aus dem ROM und schreibt 
as ii! d - n Silospeicher, Bei einer grösseren Anzahl von 

Zeichen nimmt dies beträchtliche Zeit in Anspruch. Deshalb hier 
etr Maschinenprogramm. 

Dieses-, Programm hat eine Besonderheit ; Das folgende lange 
Programm "fabriziert eine einzige Zeile 0. In dieser Zeile ist das 
benötigte Maschinenprogramm enthalten. Biese Zeile wird dann mit 

G a oT B: MI SCH. LST " , 8 bz w. mi t 1 tct »r, » n 

, mit i_iw. w: ,0 abgespeichert. Das 

Generierungsprogramm wird nun nicht mehr benötigt. Diese 
abgel i stete Zeile 0 können Sie nun mit ENTER” D:MISCH. LST" bzw. 
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ENltR"Cs" an jedes andere Programm angefügen. Achten Sie darauf, 
dass die Zeile 0 nicht editiert werden darf. 

Man konnte in einem Graphics 3 Fenster so schreiben ; 


POSITION X,Y 
PRINT TEXT* 


> ~ _ ~ n___i_:_„ 

- j . er i ii! us -dU5 i i L b t 


Tpr- 


5 I =5 UCi 


schreiben wolIen ? müssen Sie 


f dI gendsroiassen Vorgehens 


ADR=(PEEK{136)+256*PEEK(137)+5 
A=USRCADR ? X 5 Y ? ADRCTEXT*} 5 LEN(7EXT$)) 

Das ist alles« Natürlich muss dann d 
Das Programm kann man hervorragend 
Wurzsln usw* ds.rzuste11 sn = 


e Zeile 0 vorhanden sein, 
einsetzen, um Integrale, 


? I® 

* „! ‘ . www,n«nnAAAAAAAAAAAAAAAAAÄAÄÄAÄXAXXXX 

2 REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

3 DCM XXXXXXXXXXXXXXXXX *XXXXXXXXXXXXXXXXXXXXXXXXXXX 
5 REM Benau 45 mal X in einer Zeile 

10 AD=PEEK(136)+256*PEEK <137) 

20 POKE AD+2,204:POKE AD+3,204 

3 ® T^e-r 1 ™ 0 T ° 2sF0R J==0 T0 5*POKE AD+51 *I+50+J,88:NEXT J:NEXT I 
40 LIST 0 

50 FÜR 1=1 TO 198s READ XsPOKE AD+I+4,X:NEXT I 
60 LIST 0 

» 20 ^» 4 » 240 » 9 » 170,240,5,104,104,202,208,251,96,104,132 
,215,104,133,214 7 7 

zflzni^I^Bifls 104 ’ 133 ’ 217 ’ 104 ’ 133 ’ 216 ’ 184 ’ 104 ’ 240 ’ 236 ’ 133 ’ 

?i33?zl4,165;l}5;i0l’ 89 ’ 101 ’ Z15 ’ 133 ’ 213 ’ l52,240 ’ 15 ’ 165 ’ 214 ’ 1B5 ' 64 
0?170 A 16 1*^J^’ 215 * 136 » 208 ’^241,132,221,160,0,132,220,177,216,160, 

16% D 201 132,213 ’ 138 » 41 » 96 * 208 » 4 » 169 » 6 4,16,14,201,32,208,4,169,0, 

1 ^3,6^2?8^** 2 * ^^ ,9 ’ 32 ’ 133,218,138,41,31,5,21.8,133,218,169,0,16 

?M,z2™i4l;l?4;^’ 250 ’ 109 ’ 244 ’ 2 ’ 133,219 ’ 164 ’ 221 ’ 177 ’ zi8 ’ 47 ' zi3 ’ 

23S,2?5?23“i2ff;i9 6 ’ 212 ’ Z08 ’ 182 ’ 24 ’ 165 ’ 214 ’ 1B5 ’ 40 ’ 133 ’ Zl4 ’ 144 ’ 2 ’ 

290 DATA 8,197,221,208,159,96 

60^200^174 55 ’ 40 ’ 67 » 41 » 32 » 98 » 1 21,32,65,67,68,155,155,246,239,238,1 

330 DATA 208,174,203,245,229,243,244,229,242,243,155,155,155 
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Basic Abschaltung für fltari 400/800 Besitzer 

Jeder, der einen Atari 400 oder einen Atari 800 sein eigen nennt, 
hat bestimmt schon au-f Abhilfe gesonnen, wie man sein Basic ein- 
bzw. ausschalten kann, ohne es jedesmal aus dem Schacht zu ziehen. 
Dabei wird nämlich jedesmal der Computer ein- und ausgeschaltet. 
Das dies dem Computer nicht gut tut, ( Spannungsspitzen können ihn 
zerstören ) lässt sich denken. 

Wir haben nun auf Abhilfe gesonnen und folgende kleine Schaltung 
entwickelt, die es Ihnen ermöglicht, mittels eines Schalters das 
Modul je nach Bedarf zuzuschaltan. Na ja, Schaltung ist vielleicht 
etwas übertrieben. Eigentlich besteht das Ganze nur aus einem 
Schalter. Diesen bauen Sie irgendwo neben der Modul klappe ein. Am 
besten setzten Sie über den Schalter eine Leuchtdiode ( LED ) ein, 
die Ihnen anzeigt, ob das Basic Modul eingeschaltet ist. 

Für den Einbau nehmen Sie am besten dünnen Draht. Dar geeignetste 
Draht ist B.1 mm Kupferlackdraht. Achten Sie darauf, dass dieser 
beim Einbau nicht irgendwo scheuert. Die Metall kanten der Deckplat¬ 
te des Moduls müssen mit Tesafilm o.ä. entschärft werden. 

Der Einbau geht folgendermassen vonstatten : 

1. Teil 

Entnehmen Sie das Basicmodul aus dem Schacht und schrauben Sie 
die Schraube auf der Rückseite heraus. 

- Sie können nun die Metallplatte des Moduls durch leichtes Drücken 
nach oben entfernen. 

- Sie sehen nun das Innenleben des Moduls. Holen Sie die Platine 
aus dem Gehäuse, indem Sie den Halteclip vorsichtig wegbiegen und 
die Fiatine herausnehmen. Leider klemmt die Platine gelegentlich, 
sodas man vorsichtig etwas Gewalt anwenden muss. 

- Legen Sie die Platine jetzt mit der Bestückungsseite nach oben 
vor sich auf den Tisch. 
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- Wenn Sie sich jetzt Bild Nr.l anschauen, sehen Sie, dass Sie eine 
Leiterbahn unterbrechen müssen. Diese Leiterbahn ist wichtig, denn 
sie ist die Kennung für den Computer, ob ein Modul in ihm steckt 
oder nicht. Wenn Sie diese Leiterbahn nun mit einem Schalter 
überbrücken, können Sie mit ihm das Modul jederzeit ein— oder aus- 
schal ten. 

Unterbrechen Sie mit einem scharfen Messer die Leiterbahn. Achten 
Sie darauf, dass Sie die anderen Leiterbahnen nicht beschädigen. 

< Eine Leiterbahn ist ca.0,035 mm dick ) 

- Sie löten jetzt an die beiden gekennzeichneten Stellen je einen 
Draht. 

- Wenn Sie sich auch eine Leuchtdiode einbauen wo11an, müssen Sie 
für die Spannungsversorgung noch einen Draht anschliessen. Dieser 
wird auf der Rückseite der Platine angelötet. ( Siehe Bild Nr.2 ) 

- Kennzeichnen Sie jetzt die Enden der Drähte, damit Sie sie bei 
geschlossenem Modul auch auseinanderhalten können. 

- WICHTIG !! Nun kleben Sie um die oberen Kanten der Abdeckplatte 
etwa zwei Lagen Tesafilm, damit diese scharfe Kante Ihr Kabel 
nicht beschädigt. 

- Setzen Sie jetzt die Platine wieder ein und bauen Sie das Modul 
wieder zusammen. Dabei müssen die 3 Kabel zwischen dem Gehäuse und 
dem Tesafilm liegen. Sie können natürlich auch ein kleines Loch in 
das .Gehäuse bohren, aus dem Sie dann Ihr Kabel herausführen. 

2. Teil 

- Jetzt legen Sie das Modul erstmal zur Seite und widmen sich dem 
Computer. Von diesem entfernen Sie sämtliche Anschlüsse und 
vorhandenem Module. 

- Jetzt drehen Sie ihn auf den Kopf und schrauben ihn auf. 

- Nun drehen Sie den Computer wieder richtig herum und heben 
vorsichtig die Deckplatte ab. Sie können sich jetzt einen geeignet- 



en Platz für den Schalter suchen. Beim Atari 800 ist links neben 
der Klappe ( neben dem Atarizeichen ) noch genügend Platz. 

- Dort bohren Sie zwei passende Löcher in das Plastik. Achten Sie 
aber darauf, dass Sie das Loch nicht zu tief ansetzen, sonst können 
Sie die Mutter nicht mehr auf das Schaltergewinde aufdrehen. 

- Nachdem Sie nun die beiden Löcher gebohrt haben, setzen Sie jetzt 
den Schalter und die LED ein. Nun löten wir dort die Kabel des 
Moduls fest. ( Bild Nr. 3 ). Vergessen Sie nicht den Widerstand für 
die Leuchtdiode. 

- Nun wird das Modul in den Schacht gesetzt, und der Computer 
wieder zugeschraubt. Fertig. 

Achten Sie bitte auf folgendes : Auf den Leiterbahnen des Moduls 
befindet sich ein Schutzlack. Damit Sie Ihre Drähte festlöten 
können, müssen Sie diesen Lack erst mit einem Messer wegkratzen. 
Achten Sie darauf, dass Sie keine Kurzschlüsse verursachen. 



ß 
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Einführung in die Player Missile Graphik 

Der Atari Computer hat neben hervorragendem Sound und Graphik die 
Möglichkeit, auch 8 -frei bewegliche Objekte auf dem Bildschirm 
darzustel1en. Diese 8 Objekte lassen sich in zwei Gruppen 
einteilen : 4 Missiles und 4 Players. Wie der Name Missile schon 
sagt, werden diese vornehmlich als Geschosse in Spielen 

eingesetzt. Die Players werden meist eingesetzt, um Raumschiffe, 
Panzer usw. darzustellen. Der Vorteil dieser Graphik besteht 
darin, dass eine ähnliche Darstellung von Objekten bei 

herkömmlichen Computern nur in Maschinensprache- möglich ist. Der 
Atari ermöglicht es aber, mit einfachen Basicbefe-hlen ein Programm 
zu schreiben, was Besitzern von anderen Computern nur nach 
umfangreiehern Studium der Maschinensprache möglich ist. Wenn Sie 
diesen Artikel nun aufmerksam durchlesen, dann werden Sie nach 
einiger Übung in der Lage sein, Programme zu schreiben, die auch 
den Vergleich mit Automatenspielen nicht zu scheuen brauchen. 
Allerdings etwas Übung gehört schon dazu. Dies gilt auch für die 
B.ndsrBn Artikel in diesem Buch. Es ist unmöglich, auf sämtliche 
Möglichkeiten einzugehen, denn dann würde jeder Artikel 

(Scrolling, Displaylist, Player Missile Graphik ) den Umfang 
dieses Buches haben. Deswegen ist es unerlässlich, dass Sie 
selbst mit den Programmen herumprobieren. Löschen sie einzelne 
Zeilen, oder ändern Sie die Werte in den vorgegebenen Programmen, 
und schauen Sie was passiert. Dadurch lernt man besser und 
schneller, als beim Durchlesen eines dicken Artikels. 

Doch zurück zu Player Missile Graphik : Wie gesagt, stehen uns 
also 4 Geschosse (Missiles) und 4 Objekte (Players) zu Verfügung. 
Diese können unabhängig voneinander auf dem Bildschirm bewegt 
werden. Leider gibt es beim Atari einige Einschränkungen: 
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- Jeder Player und Jedes Missile kann Jeweils nur eine Farbe 
annehmen. Wenn man also mehrfarbige Objekte haben will, muss man 
mehrere verschiedenfarbige Player oder Missiles überlagern. 

-Ein Player kann nur 8 Pixel breit sein. Für grössere Objekte, 
oder wenn eine grössere Auflösung gewünscht ist, müssen wir auch 
hier kombinieren. 

Doch diese Einschränkungen sind zumindest am Anfang nicht weiter 
störend. Später werden Sie selbst auf Abhilfe sinnen können. 

Die nun immer benützte Abkürzung 'PM' steht für 'Player - Missile 
Graphik*. Da die PM ein Hardware Register ist, brauchen Sie sich 

e 

nicht zu wundern, wenn im Folgenden eine Speicherzelle 
verschiedene Bedeutung hat. 

Die nun folgende Zeile wird immer am Anfang eines Programms mit PM 
ausgeführt. Vorher muss allerdings die gewünschte Graphikstufe 
gewählt werden. 

10 A=PEEK<106)-B:PM=256*A:POKE 54279,AsPOKE 559,46:POKE 53277,3: 
POKE 623,1 


Erklärung der obiaen Proqrammzeile : 


A=PEEK(106)—8 

PM=256*A 

POKE-54279,A 

POKE 559,46 

POKE 53277,3 
POKE 623,X 


Bereitstellen des benötigten Speicherplatzes für 
PM 

In der Variable PM steht nun der Anfang des be— 
reitgestellten Speicherplatzes 

Dies sagt dem Atari, ab welchem Speicherbereich 
die PM ahfängt. 

Double Line Resolution (d.h. eine F’layerzeile ist 
2 Graphics 8 Zeilen hoch) bei 62 : Single Line 
Resolution < eine Playerzeile ist 1 Graphics 8 
Zeile hoch : also doppelte Auflösung in der Höhe) 
PM einschalten 

X ist zu ändern je nach gewünschter Priorität : 
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X=1 : alle Player haben Priorität über alle Spielfeldregister 
X=2 s Player 0, Player 1, alle Spiel-Felder, Player2, Player 3 
X=4 : alle Spiel-fei der haben Vorrang vor allen Playern 
X=8 s Spielt.0, Spielt.1, alle Player, Spielt.2, Spielt.3 
Sie bestimmen hiermit, ob ein F'layer vor oder hi nter einem 
gezeichnetem Objekt zu sehen sein soll. Ein Spielfeld ist 
gleichbedeutend mit den Farben eines gezeichneten Bildes. Am 
besten probieren Sie dies aus, indem Sie alle 4 Player aut einen 
Graphics 7 Bildschirm bringen. Dort sollten dann einige Objekte 
mit verschiedenen COLOR Befehlen gezeichnet werden. Bei der 
Bewegung der Player werden Sie feststellen, dass je nach Priorität 
eine dreidimensionale Darstellung möglich ist. 

Wie bereits gesagt, dient der erste Befehl in Zeile 10 dazu, den 
benötigten Speicherplatz freizuhalten. Damit Sie bei anderen 
Graphikstufen keine bunten Streifen auf den Bildschirm bekommen, 
muss bei höheren Grafikstufen mehr Speicherplatz frei gehalten 
werden. Die benötigten Werte entnehmen Sie bitte aus der folgenden 
Tabel1e. 


Graph 1 er m— 
mode 

Doub1 • Lin« 
Rwol tjitz on 

Singl« Lin« 

u tion 



SO 

e 

16 

X 

o 

X 6» 

2 

Q 

16» 

3 

e 

16 

-4 

a 

16» 

3 

X 6 

16 

6 

1 4b 

24 

zr 

2-4 

32 

e 

40 

40 


Wenn Sie also die PM in der Graphicsstufe 7 anwenden wollen < in 
Double Line Res. ), muss der erste Befehl also wie folgt lauten : 


10 A=PEEK<106>-24: . 


Dies gilt nur, wenn die PM voll ausgenutzt wird. Falls 
vier--F'layer benötigt werden, kann diese Zahl auch 
verkleinert werden. 

Die folgende Grafik verdeutlicht die RAM Aufteilung in 


weniger als 
entsprechend 


der PM 


B.a. 

4-13B 




+ 760 


+ 1024 


nicht 

benuti 


M3 M3 Ml MO 


Player 


PIayer 2 






ni cht 



M3 M2 Ml MO 

Pl «v»«- 

0 

PI«y«r 

X 

i*I «.yr»r~ 

2 

Play«r 

3 


Ml 
+ 1 
+ X 
+ 1 
+ 1 


760 

i X l 

024 
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Um den am Anfang noch mit eventuell unerwünschten Daten gefüllten 
Speicher zu löschen, muss als zweite Zeile folgendes stehen : 

20 FOR I=PM+3B4 TO PH+2048:P0KE I,0:NEXT I 

Bei double Line Res. muss der Speicher selbstverständlich nur bis 
PM+1024 gelöscht werden. 

* 

Wie bereits erwähnt, bietet die PM die Möglichkeit, vier 

verschiedene Figuren ( Player 0 bis Player 3 ) und vier 

verschiedene Geschosse < Missile 0 bis Missile 3 ) zu bewegen und 
eventuelle Zusammenstösse untereinander zu registrieren. 

Nun wollen wir aber anfangen, einen Player darzustellen. Ein 
Player ist 8 Zeichen breit und 128 Zeichen hoch < bzw. 255 bei 
single Line Res. ) 

Wollen wir einen Player als Ufo darstellen, machen wir folgendes : 

1. Wir zeichnen uns eine 8*3 Matrix und 

2. zeichnen dort das Bild des Ufo's ein: 



3. Nun addieren wir einfach die Zahlen in einer Reihe und Poken 
diese Zahl in die dazugehörige Speicherstelle. Wir schauen nun in 
der Tabelle nach und entnehmen aus dieser, dass Player 0 bei 
PM+512 anfängt. Wir setzen nun die gesamten Horizontalwerte des 
Player's in eine DATA Zeile z.B. 

50 DATA 0,153,165,195,195,165,153,0 
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Jetzt können wir diese Werte in die Speicherstel1en des Player 0 
einiesen. Da sich PM+512 aber ganz oben am Rand des Bildschirmes 
befindet, addieren wir dort noch eine entsprechende Y—Position zu. 
Sagen wir, Y soll 58 betragen. Dann sieht die Zeile 60 wie -folgt 
aus: 

60 FDR 1=1 TO 8:READ A:POKE PM+512+58+I,A:NEXT I 

Wenn ein Player höher sein soll, dann können natürlich auch mehr 
Datas eingelesen werden. 

Wenn wir das Programm bis hier laufen lassen, tut sich nichts. Das 
liegt daran, dass die X-Position ja noch 0 ist. Um auf dem 
Bildschirm zu erscheinen, muss die X—Position zwischen ca. 50 und 
ca. 200 liegen. Die X—Register für die Player sind 
wie folgt : 


PIayer 

X-Register 

0 

53248 

1 

53249 

2 

53250 

3 

53251 


Um Player 0 jetzt sehen zu können, geben wir folgende Zeile ein : 

70 POKE 53248,150: REM Die X Position beträgt hier 150. 

Jetzt sehen wir das Ufo ganz deutlich auf dem Bildschirm. Leider 

/ 

ist es aber schwarz. Die Player können aber auch farbig 
dargestellt werden. Dies geschieht so: 

Gewünschte Farbe = Colornummer (0-15) * 16 + Helligkeit (0-14) 

Wobei Colornummer und Helligkeit genauso gehandhabt werden wie 
beim SETCOLOR Befehl. Diese Zahl kann nun in das Farbregister von 
Player 0 gepoked werden. Das Farbregister von Player 0 ist die 
Speicherzelle 704. Also : 

80 POKE 704,X : REM X ist die gewünschte Farbe 
Wenn Sie für X 186 einsetzen, wird das Ufo hellgrün : 

( 11(grün)*16+10(Helligkeit)>=186 
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Wenn Sie das Programm bis hier haben laufen lassen muss sich ein 
grünes UFO auf dem Bildschirm zeigen. Wenn nicht, können Sie jetzt 
auf Fehlersuche gehen. 

Versuchen Sie nun, alle 4 Player auf verschiedenen X und Y Positio¬ 
nen darzustellen ( unterschiedliches Aussehen der Player's) und 
diese mit dem Steuerknüppel horizontal zu bewegen. Falls Sie es 
nicht schaffen sollten : Die Lösung ist in Programm 1 zu finden. 
Aber versuchen Sie es erst selbst !!! 

Leider ist das Bewegen auf der Y-Achse nicht so einfach wie die 
X-Bewegung. Um z.B. das UFO um eine Zeile nach oben zu bewegen, 
muss es gänzlich gelöscht und dann neu (auf neuer Y-Pos.> 
gezeichnet werden. Das dies relativ lange dauert, braucht wohl 
nicht weiter erwähnt zu werden. 

Um dieses Problem zu umgehen, haben wir in Programm 2 einen 
Programmrumpf aufgebaut, der es Ihnen ermöglichen wird, durch einen 
F'oke die Player und die Missiles auf eine bestimmte Y-Pos. zu 
bringen. Da dies in Maschinensprache geschieht, darf dort nichts 
verändert werden. Sie brauchen bei Ihren Programmen nur die Zeilen 
32000 bis 32500 übernehmen. Dort springen Sie dann nach dem 
Programmstart einmal hin, um Player Missile zu initialisieren. Dort 
wird alles für Sie erledigt. So unter anderem auch das 
Einschalten der Player Missile usw. Änderungen müssen nur dort 
erfolgen, wo Sie erwünscht werden. 

In Zeile 32030 muss, je nach Graphikstufe, ein anderer Speicherbe¬ 
darf’ kalkuliert werden. 

In ZeiLe 32080 werden di.e Farben festgelegt. 

Ab Zeile 32250 stehen die Daten für die einzelnen Players. 

Die anderen Zeilen müssen mehr oder weniger so übernommen werden. 
Nach der Initialisierung werden die Player mit dem Kommando POKE 
PLX oder POKE PLY horizontal bzw. vertikal bewegt. Wobei der 
Player 0 mit dem Kommando POKE PLX/PLY bewegt wird, Player 1 mit 
POKE PLX+l/PLY+i, Player 2 mit POKE PLX+2/PLY+2 usw. 
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I-n die jeweilige Speicherzelle wird der gewünschte X und Y Wert 
geschrieben. Siehe als Beispiel hierzu Programm 3. 

Eine weitere Besonderheit von diesem Programm ist, dass es Ihnen 
ermöglicht wird, das Aussehen der einzelnen Player rasch und 
unkompliziert zu ändern. Dazu müssen vorher die benötigten Shapes 
abgespeichert werden. Spater im Programm werden sie nur noch 
abgerufen. Doch schauen wir uns an, wie das Sanze funktioniert : 

Wie wir bereits gesehen haben, liegt der Speicherbereich der 
Player Missile Graphik von Pli bis PM+204B. Wie aus der Tabelle zu 
entnehmen ist, bleibt der Bereich von PM bis PM+1023 unbenutzt, 
d.h. genau 1000 Byte verschenkter Speicherplatz. In diesem Bereich 
speichern wir jetzt die Bilder für die verschiedenen Player ab. Wo 
dies genau geschieht, zeigt uns die nachfolgende Tabelle < Abb.l >. 



PMBABE — 

Bi 1 eJ 

X 

_ PQKE PDR.l 

-+- B — 

Bi X d 

2 

- POKE PDF:.9 

+ 1Ä — 

Bi X d 

3 

- POKE PDR.l? 

+24 — 

Bi X d 

4- 

- POKE PDR.25 

+-32 — 

Bi 1 d 

S 

” POKE PDR.33 


t3 . 




Aus dieser Tabelle ist zu ersehen, dass für einen Player max. 255 
Byte ( d.h. 255 Zeilen ) zur Verfügung stehen. Dabei ist es 
unerheblich, wieviele verschiedene Bilder sich in den 255 Bytes 
befinden. Man kann einen Player 120 Zeilen hoch machen und hat 
dann jrtur Platz für zwei verschiedene Bilder. Ebenso kann man einen 
Player nur 10 Zeilen hoch machen, dann ist Platz für 25 
verschiedene Bilder, die je nach Bedarf ausgewählt werden können. 
Bei Player 0 werden diese Bilder mit POKE PDR,X ausgewählt. X ist 
hierbei das jeweilige Bild, multipliziert mit der Bildhöhe; z.B. : 
Es sind 5 Bilder mit jeweils einer Höhe von 8 Zeilen gespeichert. 
Dann erfolgt der Abruf wie in Abb.2 zu sehen. 
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Zu beachten ist noch 

folgendes : 

die Bilder eines 

Players müssen 

immer gleich hoch sein. Die Höhe 

hierfür wird beim 

Programmstart 

in PLL abgespeichert. 

Auch hier verweise ich auf das Programm #3. 

Mit den POKE's 53256 

< P1.0 ) 

bis 

53259 < PI.3 ) 

kann die Grösse 

der einzelnen Player 

geändert 

werden. Dies geschieht 

wie folgt ; 


Gepokte 

Zahl 

Grösse 



0. 


normal 



1 


doppelt 



3 


dreifach 



Nun möchten wir aber nicht nur die Player bewegen, sondern auch 
Schüsse o. ä. abgeben. Diese Schüsse heissen Missiles. Es gibt 4 
Stück davon. Sie haben die gleiche Farbe wie der dazugehörige 
Player. Missile 2 hat also die gleiche Farbe wie die, die*für 
Player 2 ausgewählt wurde. Die Bewegung er-folgt ähnlich wie bei 
den Player's. Die X Bewegung wird mit den POKE's 53252 (Miss.0) 
bis 53255 (Miss.3) ausgeführt. 

Wie aus der folgenden Tabelle zu ersehen ist, liegen die Missiles 
im RAM Bereich von PM+768 bis PM+1023. In diesen 
Spei eherPositionen liegen 4 Missiles. Je nachdem welche Zahl man 
in diese Zellen schreibt, wird das jeweilige Geschoss bewegt. 

- 1 
-4 
- 16 
- 64 

Die Bewegung von Missile 0 wird wie folgt gehandhabt. 

mit POKE 2,X die X-Position ( ca. 50 bis ca. 200 ) 

und die Y-Position mit z.B. FOR 1=0 TO 255sP0KE PM+768+Ij0:PQKE 

PM+768+1+1,1:NEXT I 

Anstatt der gepokten 1 können auch die anderen Missiles stehen < 
also 4, 16, 64). Um diese horizontal zu bewegen, muss natürlich 

deren X- Register geändert werden. 


Missile 8 
Missile I 
Missile 2 
Missile 3 
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Nun müssen wir natürlich auch noch teststellen können, ob ein 
Schuss getroffen hat, ob ein Player oder ein Missile ein 
gezeichnetes Objekt (Spielfeld) berührt hat, ob zwei Player 
zusammengestossen sind ..... 

Dafür gibt es die Kollisionsregister. In den nachfolgenden 
Tabellen können Sie sehen, mit welchem PEEK welche Zusammenstösse 
registriert werden können. Normalerweise sind alle 
Kol1isionsregister S. Bei Berührung der ihnen zugeordneten Objekte 
ändern sich die Werte in den K.-Registern. Damit eine ' kurzzeitige 
Berührung nicht aus Versehen übersehen wird, erfolgt keine 
automatische Löschung der Register. Dies muss man nach einer 
Berührung selbst machen. Dies geschieht mit PQKE 53278,255. 


So, nachdem dieses Thema min ausführlich behandelt wurde, hoffe 
Ich, dass Sie mit dem Programm #3 zurecht kommen. Wo Sie etwas 
nicht verstehen, ändern Sie die entsprechenden Programmzeilen und 
probieren Sie herum. 



Kol 1 i ni on.i'.g i »t»r a 
Pl«yair — PI *y«r 



Kol 1 i .i onsr.gi «tarr s 
Mlv.ll« - PI.yor 



Kol1aion.r.gl*t«r • 
8pi.l-T.ld < COLOR > — 
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10 GRAPHICS 0:SETCDLOR 2,0,0 

11 POKE 752,1:? "ü":REM CURSOR AUS 

20 A=PEEK(106)-8:PM=ft*256:POKE 53277,3sPOKE 559,46:POKE 54279,A:R 
EH PH EINSCHALTEN 

30 FOR I=PH+384 TO PM+1024:POKE 1,0:NEXT I;REM SPEICHER CLEAREN 
40 Y0=20:Yl=50:Y2=S0:Y3=110:REM Y POS ITIQNEN DER 4 PLAYER 
50 FOR 1=1 TO 8:READ A:POKE P!i+512+Y0+I,A:NEXT I:REH PLAYER 0 
60 FOR 1=1 TO S:READ A:POKE PM+648+Y1+I,AsNEXT I:REH PLAYER 1 


I:REH PLAYER 
I:REH PLAYER 


/W FOR 1=1 TO S :READ A ; POKE PM+768+Y2+I,A:NEXT 
BS FOR 1=1 TO 8: READ A:POKE PM+896+Y3+I,A:NEXT 
89 REH DATAS DER PLAYER 3-3 f 

93 DATA 0,153,165,195,195,165,153,0 
100 DATA 173,85,170,05,170,85,170,85 
110 DATA 178,170,170,170,170,170,170,173 
123 DATA 255,129,129,129,129,129,129,255 

150 POKE 704,31:POKE 705,62:POKE 786,93: POKE 737,124;REH FARBEN D 
EH PLAYER 3-3 

168 X0=60:X1=S0:X2=100:X3=120:REH X POSITIONEN DER 4 SPIELER 
173 S=5TICK<0>:REM STEUERKNUEPPEL 
171 TRAP 303 

100 IF S=ll TUEN X8=X0-2.5:Xl=Xl-2;X2=X2-i,5:X3=X3-1:REH LINKS 
i? S IZ S= Z_I HEN X3=X8+2.5:Xl=Xl+2:X2=X2+1.5iX3=X3+1:REM RECHTS 
208 HUKE 55248,X0sPOKE 53249,X1:POKE 53258,X2:POKE 53251.X3:REH X 
-POSITIONEN DER 4 PLAYER POKEN 
218 GOTO 170 

388 ? "üü PLAYER IST AUSSERHALB BES ERLAUBTEM BEREICHS /////*•:RE 

H EINE X POSITION IST >255 ODER <8 

381 FOR 1=1 TO 308:NEXT Is? “ü"sGGTÖ 160 




32088 REH - - . 

32810 FOR 1=1536 TO 1786:READ AsPOKE I,A;NEXT I 
32828 FOR 1=1774 TO 1787:POKE 1,0;NEXT I 
32338 PM=PEEK <106 >-16: PMBASE=256*PM 

32348 FOR I=PMBASE+1023 TO PMBA3E+2047:POKE 1,8:NEXT I 
32058 FOR 1=8 TO 3: DRW=PHBASE+ 1*256+1 
32060 RESTORE 32258:FOR J=@ TO 3 

32873 FOR K=DRW+J*24 TO DRW+J*24+23:READ X;POKE K,X:NEXT KsNEXT J 
:NEXT I 

32808 POKE 704,12:POKE 705,128:POKE 706,43:POKE 787,192 
32098 PLX=53248:PLY=1783:PLL=1784 

32100 POKE 559,62:POKE 623,1;POKE 1788,PM+4:POKE 53277,3sPOKE 542 
79, PH 

321 L0--PDR= 1772; POKE 1771, PH 
32120 X=U3R <1696) 

32130 RETURN 

32148 DATA 162,3,189,244,6,240,89,56,221,240,6,240,83,141,254,6,1 
06,141. 

32158 DATA 255,6,142,253,6,24,169,8,189,253,6,24,109,252,6,133,20 
4,133 

32168 DATA 286,189,240,6,133,283,173,254,6,133,205,189,248,6,170, 
232,46,255 

32178 DATA 6,144,16,168,177,283,145,205,169,0,145,283,136,202,288 
,244,76,87 

32180 DATA 6,160.0,177,203,145,205,169,8,145,203,200,202,208,244, 
174,253,6 
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;l< 

n? 


21 


rjL % 
i-S f 


!1- 

ji • 
, 

.1 

k* 


DA 1 A 1 / -‘* 254 *6,157,243,6,189,236,6,24® ,48,133,203,24 

•52200 DATA- 109,235,6,133,204,24,173,253,6,109,252,6,133,20i 
48,6,133 

32210 DATA 205,189,248'6,170,160,0,177,203„145.205,200,202 

p 1 '/ 4. "7* ^"7 i- ' 

32220 DATA 169,0,157,236,6,202,48,3,76,2,6,76,98,228,0,0.1J 
-52230 DATA 7,162,6.16S, 8,32.92.228,96 
32243 REM 

•52250 DATA 3, 12,12,30,0, 12, 12,0,12,14,33,45,13.13,12,28,28. 
34,34,34,102,0 ' ’ ‘ 

32268 DATA 0,12,12,30,0,12,12,0,12,14,14,13,26,4.8,12,12,2£ 
,20,18,50,0 . 

52279 DATA 0,12,12,30,0,12,12,0,12,14.10.14.30-12,8,12,23-5 
,12,8,24,0 ' 

32288 DATA 0,12,12,30,0,12,12,0,12,12,12,10,6,30,12,12,12.1 
3,20,18,50,6,0 



■-«j 


Bi 

4. 




(55. 




h... 



55 


r-y 

52 


io Graphics 7 +i 6 : s-ur 1=0 to 30:cdlur rnd <3; *3+1; plot rnd (0 
ND(3>*905NEXT I 
3® GOSUB 32300 
31 X=100;J=130äS=l 


pni-r =r-7rr?=:i 1 

■*— ! ' T *— t—3 jiL ’—‘ | _£ 


PuKfc. PLY+i,222:POKE PDR+i 


- '—Ti'-.i— -J-uri LJ ^ 


, i. 


4ß Für £-215 fO -53 SiEP —5 s REH UFO BEWEGUNG AUF DER X-ACHS 

41 tL (53256)=1 iHEN 1333:REM TREFFERABFRAGE 

42 J.r ^EEK (5-5257) =2 THEN 1130: REM TREFF ER ABFRAGE 
44 POKE 53278,255:RtM KOLLISIONSREGISTER LOESCHEN 
53 POKE PLX,I 

51 A=RND(0):IF A>0.5 THEN J=J+i;SOTO 55 

52 J=J—1:IF J<33 THEN J=33 
55 IF J >123 THEN J=120 

.56 POKE PLY, J: REM UFO BEWEGUNG AUF DER Y-ACHSE 
63 8=3+3:IF S>47 THEN 8=1 

73^POKE PDR,S:SOUND 8,5*2,10,5/4:REM AUSWAHL DES JEWEILIGE i 
J £-Z?£~o 

BS IF SCH=1 THEN 95:REM EIN SCHUSS DES UFO'S IST BEREITS Ui 

82 IF RND <0X3.9 THEN 103: REM KEIN NEUERUFO SCHUSS 
34 POKE 53253,1+3: MMY=PMBASE+768+J 
36 5=CH=i: RtM NEUER UFO SCHUSS 

95 PuKE MMY,0:MMY=MMY+5 : POKE MMY,4:IF MMY>PMBASE+998 THEN J 
OKE MMY,0:REM UFO SCHUSS BEWEGUNG 

133 ST=STICK(0):TR=STRIG<0>:REM ABFTAGE JOYSTICK UND TRIGSl 
110 IF ST=/ THEN X=X+3:IF X>200 THEN X=200:REM BASIS NACH / 

IF 31-11 THEN X=X-3:IF X<50 THEN X=50:REM BASIS NACH l 
i.50 POKE PLX+1, X: REM NEUE BASISSTATION 

140 IF SC=1 THEN 161:REM BASIS SCHUSS BEREITS UNTERWEGS 

150 IF TR=1 THEN MY=PMBASE+768+220:GOTO 200:REM KEIN NEUER 
SCHUSS 
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Antic und die Displaylist 

Eine Einführung in die Graphikmöalichkeiten des Ataris 

Teil 1 

"Antic” ist die Bezeichnung -für den Graphi kprozessor im Atari. 
Er steuert alles, was zum Aufbau des Fernsehbildes benötigt wird. 
Antic ist ein richtiggehender, programmierbarer Microprozessor 
und verfügt über DMA ( Direkt Memory Access, direkter 
Speicherzugriff ), d.h., dass Antic jederzeit, wenn er Daten für 
den Bildaufbau benötigt, auf den gesamten Speicher des Ataris 
zugreifen kann. Da die £502 CPU während dieser Zeit ihrerseits 
keinen Speicherzugriff durchführen kann, setzt die Arbeit des 
Graphikprozessors die Verarbeitungsgeschwindigkeit von Programmen 
herab, was sich mit dem folgenden Programm leicht zeigen lässt : 

10 GRAPHICS 0 
20 POKE 559,34 
30 POKE 19,0:POKE 20,0 
40 FOR 1=0 TO 5000:NEXT I 
50 TIME=PEEK(20)+256*PEEK(19) 

60 GRAPHICS 0 
70 PRINT "Zeit= M ; TIME 

Lassen Sie das Programm durchlaufen und merken Sie sich die Zeit, 
die -angezeigt wird. Ändern Sie nun Zeile 20 in: 

20 POKE 559,0 

Jetzt lassen Sie das Programm erneut ablaufen. Der Bildschirm wird 
jetzt zwar dunkel, jedoch sollte die Laufzeit um ca. 30 V. kürzer -• 
sein. 

Anstatt dessen, können Sie aber auch Zeile 10 in jeden anderen 
Graphikmode abändern und einen Vergleich des Zeitbedarfs der 
einzelnen Graphikmodis anstellen. 
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Probieren Sie auch mal den Unterschied zwischen) einem leeren und 
mit beliebigen Zeichen gefüllten Bildschirm aus. Der Unterschied 
ist beträchtlich ! 

Auch Player Missile Graphik kostet Zeit ! Im ungünstigsten Fall 
kann sich die Ausführungszeit von Programmen um über 50 V. 
erhöhen. ( Grosses Bildfenster + hochauflösende Graphik + 
gefüllter Bildschirm + PM Graphik ) 

Da. man aber nicht immer alle diese Dinge auf einmal benötigt, 
kann man sie je nach Bedarf ein- und ausschalten. 

Hierzu dient nun die bereits erwähnte Speicherstel1e 559 ( 4222F 
— SDMCTL ). Sie ist das Shadow—(Schatten)register für die 
Speicherstelle 54272 ( £D400 - DMACTL). Als Shadow Register 
bezeichnet man Speicherstellen im RAM Bereich, deren Inhalt vom 
Atari automatisch jede 50-tel Sekunde in das entsprechende 
Register eines der Peripheriebausteine des Ataris übertragen 
wird. 

Für uns bedeutet das, dass wir anstatt in 559 auch in 54272 poken 
können, allerdings mit dem Erfolg, dass das von uns gewünschte 
Ergebnis nur ma>;. eine 50-tel Sekunde anhält. 

Was ».kann man nun alles mit dieser Speicherstelle anfangen ? 
Darüber gibt uns die Tabelle auf der nächsten Seite Auskunft : 
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Dezimal wert 

Bit 

Funktion 




Zeichen/Zeile 

0-3 

0-1 

0- kein Bildfenster 

0 




■»n 



- i 

2- normales Bildfenster 

40 



BEBOBB Jj 

48 

4 



o 

i 

f 

*T 


- --1 

16 

4 

Einzeilige Auflösung für Pli Graphik 



ein-ausschaltan ( ansonsten 2—zeilig ) 

-yrj 

5 

Antic ein-ausschalten (norm. Graphik ) 

64 

6 

nicht benutzt 

12S 

"7 

e 



Baim Einschalten enthält die Speieherstelle den Wert 34 ( 32+2 ), 
also normales Bild-Fenster und eingeschaltetes Antic. 

Die -beiden anderen Bild-Formate werden vom Basic leider nicht 
unterstützt-,- richtig verwenden kann man sie nur in 
Maschinensprache. Wie Sie aus der Tabelle entnehmen können, ist es 
z.B. auch möglich, nur PM-Sraphik zu verwenden ( ohne normale 
Graphik ), wenn man es für nötig hält. 
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Antic und die Displaylist 

Eine Einführung in die Graphikmöqlichkeiten des Ataris 

Teil 2 - Die Displaylist 

In diesem Teil wallen wir uns damit beschäftigen, wie wir Antic 
dazu bringen können, Text oder Graphik auf dem Bildschirm 
darzustel1 an. 

Hierzu wird ein kurzes Programm verwendet : die sogenannte 
Display!ist. 

Diese Methode ist zwar für Computer in dieser Preisklasse nicht 
ublich, jedoch .ist der Atari gerade dadurch vergleichbaren 
Rechnern graphisch überlegen. 

Die Displaylist ist zwar ein Maschinenprogramm, jedoch sind die 
verwendeten Instruktionen natürlich andere als die 6532 Codes; es 
sind Spezialbefehle, die speziell auf den Antic-Graphikprozessor 
zugeschnitten sind. 

Die Informationen darüber, wo sich die Displaylist im Speicher 
befindet, bezieht Antic aus den Speieherstellen 560 ( 

*0233, SDLSTL ) und 56-1 < *3231, SDLSTH ). Dies sind die 

Shadowregister für die Anticregister 54274 ( *Ü402,DLISTL ) und 
54275 (*D433,DLISTH ). 

Wenn Sie wissen wallen, wo sich die Displaylist befindet, schrei¬ 
ben Sie : DL=PEEK(560)+256*PEEK(561> 
und um eine-neue Displaylist zu aktivieren : 

POKE 560,DL/256-INT(DL/256) 

POKE 561,INT(DL/256) 

wobei DL die Adresse Ihrer Displaylist ist. 

Im Folgenden wollen wir uns eine Displaylist einmal näher ansehen. 
Geben Sie hierzu das folgende Programm ein. 
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10 DIM D(32) 

20 GRAPHICS 3+16 

30 DL=PEEK(560)+256*PEEK(561) 

40 FOR 1=0 TO 31 

50 D(I)=PEEK(DL+I) s NEXT I 

60 GRAPHICS 0 

70 FOR 1=0 TO 31 

80 PRINT D(I);" NEXT I 

Die ersten drei Befehle lauten 112 ($70) und bedeuten jeweils die 
Ausgabe von S leeren Fernsehzeilen. Da das vom Atari dargestellte 
Fernsehbild über insgesamt 238 Fernsehzeilen verfügt ( eine 
Graphics S Zeile entspricht einer Fernsehzeile >, waren diese 
Befehle nötig, um das Graphics 3+16 Bildfenster, das über 192 
Fernsehzei1en verfügt, in die Mitte des Bildschirms zu rücken. 
Wenn wir diese Befehle weglassen, dann würde unser Fernsehbild am 
oberen Rand des Fernsehers beginnen. Allen durch Graphics- Befehle 
generierten Displaylists ist es gemeinsam, dass sie über diese 
drei Leeranweisungen verfügen und das dargestellte Bild 192 
Fernsehzeilen hoch ist. Doch schauen wir weiter. 

Die nächsten drei Werte gehören zusammen und sind eigentlich ein 
Doppelbefehl. Der erst Wert 72 setzt sich aus 64+8 zusammen. Die 
8 bedeutet, dass die erste Bildzeile ( bzw. die ersten acht 
Fersehzeilen, da eine Graphics 3 Zeile 8 Fersehzeilen hoch ist ) 
eine Graphics 3 Zeile ist. Sehen Sie sich hierzu auch die Tabelle 
am Schluss an. Bei einer Graphics 8 Displaylist stände dort 79. 
Diese setzt sich dann aus 64+15 zusammen, wobei 15 eine Zeile in 
Graphics 8 bedeutet. 

Wie Sie sehen, unterscheiden sich die Graphikcodes der Displaylist 
von den Graphikbefehlen in Basic. Hier ist Vorsicht geboten. 
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Die 64 ist eine sogenannte LOAD MEMORY SCAN < LMS ) - Anweisung 
und teilt Antic mit, an welcher Adresse sich die Daten befinden ( 
das Bild ), die zur Anzeige gebracht werden sollen. Darauf folgt 
eben diese Adresse, aufgespalten in nieder- und hcherwertiges 
Byte. 

Da Antic nun weiss, wo sich im Speicher die Daten für die Anzeige 
befinden, wird die LMS Anweisung für die weiteren Zeilen nicht 

mehr benötigt, es folgen 23 achter. Somit haben wir 24 Graphics 3 

/ 

Zeilen (Die erste Zeile wird aus der 64+8 gemacht, es folgen 23 
weitere). 

Die letzten drei Bytes bilden wiederum einen Befehl, nämlich 
einen Sprungbefehl zum Beginn der Displaylist, da Antic das Bild 
ja nicht nur einmal, sondern immer wieder aufbauen soll. Die 
erste Zahl ( die 65 ) sagt der Antic, dass sie auf den VERTICAL 
INTERRUPT ( VBI ), der alle 1/50 Sekunde ausgelcst wird, warten 
soll. Dies dient zur Syncronisation von Antic mit dem 
Schreibstrahl in der Bildröhre. Ohne dieses Warten würde man kein 
stehendes Bild erhalten. Bei amerikanischen Geräten tritt der VBI 
übrigens jede 1/68 Sekunde ein. Dadurch sind diese Computer um ca 
20 V. schneller. Wer sich also über ein zu schnelles Spiel ärgert, 
kann sich damit trösten, dass dieses Spiel in Amerika noch 
schneller ist. 

Die beiden letzten E:ytes beinhalten somit die Startadresse der 
Displaylist, sind also mit den Inhalten der Speieherstellen 568 
und-'561 identisch. 

Hier noch einmal eine schematische Übersicht über den Aufbau 
einer Displaylist, die über Graphics—Befehle aufzurufen ist. ( 
ohne Textfenster ) 

1. 3 x 8 leere Fernsehzeilen 

2. LMS- und Displayanweisung 

3. restliche Bisplayanweisungen ( 2.+3. ergeben zusammen 192 


Fernsehzei1en. 
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4. RückspranganWeisung 

Mit Textfenster sieht das Ganze -folgendermassen aus ; 

1. 3 x 3 leere Fernsehzeilen 

2. LMS- Anweisung und Graphikdisplayanweisung 

3. restliche Graphikdisplayanweisung ( 2.+3. zusammen lfcß F.z.) 

4. LMS-Anweisung und Textdisplayanweisung für Graphics ß ( 66 ) 

5. 3 restliche Graphics 0 Textdisplayanw.( 4.+5. zus. 32 F.z.) 

6. Rücksprungbefehl 

Bei der Erstellung eigener Displaylist müssen Sie folgendes 
beachten : 

1. Die Summe dar dargestellten Fernsehzeilen darf 238 nicht 
überschreiten 

2. Bei längeren Displaylists müssten Sie darauf achten, dass die 
Displaylist eine 1 K Grenze nicht überschreiten kann. Sie können 
also keine Displaylist von der Adresse 2320 - 2123 verwenden, da 
2*1024=2043 eine 1 K Grenze ist. Sie können also bei diesem 
Beispiel erst bei 2248 anfangen und haben Platz bis 3072. Sie 
können« diese Grenze allerdings mit einer Sprunganweisung C ohne 
VBI ! siehe Tabelle ) überqueren. 

3. Die Displaydaten können eine 4 K Grenze nicht überschreiten. 
Wenn die Datenmenge grösser als 4 K ist ( z.B. für ein Graphics 3 
Display ) müssen Sie mit LMS Anweisungen arbeiten, um die 4 K 
Grenze zu überschreiten. Schauen Sie sich einfach eine Graphics 3 
Dispjhayl ist an. Bann sehen Sie, was gemeint ist. 

In der folgenden Übersicht sind alle weiteren Informationen 
enthalten, die Sie benötigen, um eigene Displaylists zu erstellen. 
Ausser den vorher erwähnten Beschränkungen sind Ihrer Phantasie 
keine Grenzen gesetzt ( durch eine Displaylist von 233 Graphics 8 
Zeilen und POLE 559,35 können Sie z.B. die Auflösung des Ataris 
auf den Maximalwert von 384 x 238 = 91392 Pixel steigern ! ) 
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Wenn Sie eine eigene Displaylist verwenden wollen, müssen Sie da¬ 
rauf achten, dass der Datenkanal (#6) -für der. Bildschirm geöffnet 
ist sonst sind Befehle wie DRAWTO, PLOT, PRINT#6 usw. nicht 
verwendbar. Dies erreichen Sie durch einen beliebigen Graphik 
Befehl, der ein Graphikfenster hat. ( z.B. GRAPHICS 3 ). Wenn Sie 
nun bestimmte Zeilen beschreiben wollen , so poken Sie am besten 
vorher in die Spei eher stelle 87 den entsprechenden Sraphicswert. 
Wenn Sie beispielsweise mitten in einem Block von GR.7 Zeilen 
eine Textzeile haben ( z.B. GR.1 ), so erstellen Sie die Graphik 
durch FOKE 87,7 und verwenden anschliessend PLOT und DRAWTO 
Befehle . Den Text schreiben Sie nach POKE 87,1 mit PRINT #6 - 
Befehlen. 

Schwierigkeiten kann es auch unter Umständen mit dem POSITION 
Befehl geben. Durch POKE 87,8 können Sie zwar die ärgerlichen 
ERROR 141 < Cursor out of Range ) vermeiden, sofern Ihre 
Displaylist nicht mehr als 192 Zeilen umfasst. Allerdings können 
Verschiebungen auftreten, da mehrere Graphik Modi 20 oder nur 18 
Bytes pro Zeile statt der üblichen 40 anzeigen. Hier hilft nur 
Nachrechnen oder Ausprobieren. 

Wenn Sie eigene Displaylists erstellen wollen, gehen Sie am besten 
so vor : 

1. Legen Sie einen Speicherbereich fest, wo Ihre neue DL liegen 

soll. Die PAGE 6 ist ein guter Platz hierfür < dez. 1536-1791 ) 

2. überlegen. Sie, wieviel Zeilen Sie in welchem Graphik-Mode dar¬ 
stellen wollen, und notieren Sie sich die genaue Abfolge.( Auf die 
Anzahl der Fernsehzeilen achten !! ) 

3. Berechnen Sie aus den Angaben in der dritten Spalte der über - 

sicht den Speicherplatz, den Sie für den Bildspeicher benötigen. 
Wenn Sie diesen Wert von der höchsten verwendbaren RAM-Adresse 
(bei einem 48 K Rechner mit Basic Cartridge ist dies 40960 ) ab- 

ziehen, erhalten Sie die Adresse, wo später Ihr Bildspeicher be- 
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ginnt.Jede andere, niedrigere Adresse wäre natürlich auch möglich. 
Diese Adresse verwenden Sie später bei der LMS Anweisung, 
ausserdem müssen Sie sie in die Speicherstellen 88 und 89 poken, 
damit das Betriebssystem weiss, wo die Bilddaten beginnen. Achten 
Sie darau-f, dass 4 K-Grenzen durchweine zusätzliche LMS - Anwei¬ 
sung umgangen werden müssen. 

Wenn Sie ausserdem noch , die normalen PRINT Befehle verwenden 
wollen, müssen Sie die Adresse auch noch in die Spei eherstel1en 
668 und 661 einpoken. Dies -funktioniert allerdings nur dann, wenn 
Sie vorher eine Displaylist mit Textfanster hatten. 

In den meisten Fällen ist es jedoch einfacher, bestehende 
Displaylisten zu verändern. Man spart sich hierbei eine Menge 
ftrbeit. 



Antic 

Mode 

Basic 

Mode 

Bytes 
pro Zeile 

Pixel 
pro Zeile 

Anzahl 
der Farben 

Anzahl 

Tv-Zeilen 


rj 

3 

43 

43 

1.5 

8 

T 

3 

- 

43 

43 

1.5 

18 

e 

4 

(12) 

43 

40 

4 

8 

X 

5 

(13) 

43 

43 

4 

16 

t 

6 

4 

i 

23 

20 

5 

8 


~7 

/ 

2 

23 

20 

CT* 

wl 

16 


8 

T 

•_* 

13 

40 

4 

8 

G 

.9 

4 

13 

80 

r> 

JC- 

4 

■r~ 

13 

1 

5 

23 

80 

4 

4 

a 

11 

6 

23 

160 

2 

*1 

-F 

12 

(14) 

28 

160 

n 

1 

± 

13 

7 

43 

160 

4 

1 

Pc 

14 

(15) 

43 

160 

4 

1 


15 

_ 

3 • 

40 

320 

1.5 

1 


Leerzeilen - Befehle 


0 - 1 Leerzeile 
16-2 Leerzeilen 
32-3 Leerzeilen 
48 - 4 Leerzeilen 
64-5 Leerzeilen 
80-6 Leerzeilen 
96-7 Leerzeilen 
112 - B Leerzeilen 


Sprung - Befehle 


1 - Sprung zur folgender, 
Adresse 

65 - Hie 1 aber lit Karten 
auf VBI 

Optionen für Display - Befet 


+ 16 - Horizontales Scrolle 
+ 32 - Vertikales Scrollen 
+ 64 - Load Heeory Scan 
+ 128 - Displaylist Interrup 
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Programmerklärung 

Das untenstehende Programm ist eine Demonstration dessen, was man 
mit Displayliständerung alles anfangen kann. In diesem Demo wurde 
diesmal nicht eine neue Displaylist erstellt, sondern einfach die 
schon bestehende geändert. Diese geschieht in den Zeilen 33 und 
63 bis 63. Han beachte, dass jeweils immer die Speicherzel1e 37 
geändert wird. Zeile 73 + 33 verdient besondere Aufmerksamkeit : 
Wenn Sie versuchen, nach POR'E 37,3, auf den unteren Teil des 
Graphics 7 Screens zu schreiben, gibt der Atari ERROR 14i aus. 
Wenn der Computer denkt, er wäre in Mode 3, erlaubt er auch nur 
24 Zeilen zu schreiben. Mehr geht nicht. Deshalb muss der Compu¬ 
ter überlistet werden. Man teilt dem OS einfach eine neue Bild¬ 


anfangsadresse mit. Nun kann man wexter unten anfangen. Xn diesem 
Fall haben wir das Bild um 31 Zeilen mit je 43 Byte = 1243 Byte 
nach unten verschoben. Bei eigenen Anwendungen muss hier nstür— 
lieh ein anderer Wert hinein. 

13 GRAPHICS 7+16:COLOR 1 

11 SETCOLOR 2,3,3 

23 DL=PEEK< 563)+256+PEER(561) 

33 F'OKE DL+3,66:REM 1. Zeile graphics 3 

43 PORE 8/,3:? #6;“ Display List Demoprogramm 

45 PORE 37,7 

50 FOR 1=0 TO 159 STEP 31.3:FÜR J=3 TO 159 STEP 31.8:PLOT 1,1: DRA 
WTO J,33:NEXT J:NEXT I 
63 PORE DL+36,2;REM Graphics 3 

61 PORE DL+37,6:REM Graphics 1 

62 PORE DL+33,7:REM Graphics 2 

63 PORE DL+39,2:REM Graphics 3 

- 69 REM neuen Bildanfang Simulieren 
73 fii=PEER(83)+256+PEER(89):A2=A1+1240:H=INT(A2/256);L=(A2/256-H) 
*256.' 

83 PORE 88,L:PORE 89,H:PORE 87,0 

81 POS FRON 0,3 

82 PORE 752,1 

93 7 #6;" wir mischen jetzt GRAPHICS 7 mit 
103 ? #6;" GRAPHICS 1 und graphics 2" 

113 7 #6;" und Graphics 0“ 

123 PORE 87,7:FOR 1=3 TO 103:COLOR RND(0)*4+1:PLOT 43,20:DRAWTO R 
ND(3)*43+23,RND(3)*40+5 

133 PLOT 123,23:DRAWTO RND(0)*40+188,RND(0)*43+5 
148 NEXT I 

283 FOR 1=6 TO 255:SOUND 0,I,10,13:SOUND 1,1-2,10,13:SOUND 2,1-4, 
10,10:SOUND 3,1—6,10,10:PORE 70B+Q,I:NEXT I 
218 0=0+1:IF 0=4 THEN Q=0 

220 PORE 789,216: PORE 710,0:POKE 711,120:POKE 713,0: GOTO 200:REM 
Farben 

1800 GOTO 1080 



Antic und die Displaylist 

Eine Einführung in die Graohikmöolichkeiten des Ataris 

Teil 3 - Scrolling 

Grundsätzlich unterscheidet man zwischen zwei verschiedenen Arten 
von Scrolling : Course Scrolling und Fine Scrolling. Course ( Grob 
- Scrolling ) bedeutet, dass der Inhalt des Bi1dspeichers byteweise 
verschoben wird, um beim Benutzer den Eindruck kontinuier1ieher 
Bewegung zu erreichen. 

Wer schon einmal bei einem bekömmlichen Computer versucht hat 
einen Dafender o.ä. zu schreiben, wird sicherlich zustimmen, dass 
dies selbst in Maschinensprache eine ziemlich Zeitaufwendige 
Angelegenheit ist und die Qualität des Bildes, aufgrund der Sprünge 
in der Bewegung, ziemlich schlecht ist. Das Demoprogramm i ver¬ 
mittelt einen ungefähren Eindruck von der Qualität dieser Bilder. 
Aber es gibt natürlich bessere Möglichkeiten. 

Wie wir schon in Teil 2 gesehen haben, bietet der Atari durch Load 
Memory Scan - Anweisungen ( LMS ) in der Displaylist die Möglich¬ 
keit, die Startadresse der Bilddaten für jede Zeile einzeln festzu- 
1 egen. 

Wann man nun die Bild-Daten folgendermassen anordnet, ist es 
möglich, nur durch Verändern der Adresse in der LMS - Anweisung den 
Bildschirm zu scrollen. 


<40 Bytes> 
- 256 Bytes 




















Man schiebt den Bildschirm also praktisch wie ein Fenster über den 
Speicher. 

Der Wert von 256 Bytes ist zwar willkürlich gewählt, jedoch zu 
empfehlen, da der Programmieraufwand hierbei minimal ist. Das 
Demoprogramm 2 verwendet diese Methode und zeigt, dass es selbst 
im ach so langsamen Atari Basic möglich ist, den Bildschirm mit 
annehmbarer Geschwindigkeit zu scrollen. 

Normalerweise würde man natürlich die Bcroll - Routine als 
Maschinenprogramm schreiben, aber hier wurde erst einmal bewusst 
darauf verzichtet. 

Ihnen wird sicherlich aufgefallen sein, dass sich ein Sprung in der 
Bewegung befindet, wenn die Schleife von vorne beginnt. Dies kann 
man nur durch eine geschickte Anordnung der Bilddaten vermeiden» 
Doch dazu später mehr. 

Nun zum Fine - Scrolling. 

Im obigen Beispiel haben wir den Bildausschnitt immer um ein 
Zeichen verschoben, welches bekanntlich acht Bildpunkte breit ist. 
Beim Fine — Scrolling wird nun um jeweils zwei Bildpunkte 

verschoben, um eine weichere, nicht so ruckartige Bewegung zu 
erreieben» 

Auf gewöhnlichen Computern wäre dies, wenn überhaupt, nur mit 
komplizierten Umdefinitionen des Zeichensatzes und ähnlich fiesen 
Tricks möglich. 

Ei ne», bitweise Verschiebung einer hochauflösende Grafikseite, wäre 
allein durch ihren höhen Rechenaufwand nicht mehr zu vertreten. 
Glücklicherweise können wir diese Aufgaben völlig Antic 
überlassen, der intern dazu in der Lage ist, Fine — Scrolling 
sowohl horizontal, als auch vertikal durchzuführen. Hierzu müssen 
wir für jede Zeile, die später gescrollt werden soll, 
entsprechende Bit in der Displaylistanweisung setzen. 


das 
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Man kann also selbst bestimmen, welche Zeilen gescrollt werden 
sollen und welche nicht ( z.B. für Score Anzeigen usw. ) Nun kann 
man durch poken in das Antic - Register HSCROL < $D404 - 54276 ) 

oder VSCROL ( $D405 — 54277 ) angeben, um wieviele Bildpunkte 

gescrollt werden soll. Selbstverständlich ist es auch möglich, 
gleichzeitig horizontal und vertikal zu scrollen ( Spiele wie 
Zaxxon und Blue Max sind gute Beispiele hierfür ). 

Demoprogramm Nr.3 zeigt ein Beispiel für die Verwendung der 
Scrol1 register. 

Wichtig sind hierbei nur die unteren vier Bit der Werte, die in 
diese Register geschrieben werden; die oberen vier werden nicht 
beachtet. 

Somit ergeben sich die Werte von 0 - 15 als mögliche 

Verschiebungen. S ist der normale Wert, jede weitere Zahl 
verschiebt die Zeile um jeweils 2 Bildpunkte ( d.h. 2 Graphik S 
Punkte ) nach rechts bzw. nach oben. 

Was macht man aber nun, wenn man mehr als 15 Einheiten weit 
scrollen will? Hier hilft nur eine Kombination von Coarse- und 
Fine — Scrolling. 

Wenn wir also beispielsweise eine Graphics 0 Zeile scrollen 
wollen, durchlaufen wir erst die ScrolIregister 3 bis 0 und führen 
dann einen Coarse - Scrol1 aus, der den Beginn der Zeile um ein 
Byte verschiebt. 

Die folgende Graphik soll das verdeutlichen. 

Bcrol1r»gi*t»r * 3 

123456781234567B123456701234567812345678 


8crollr»gi«t*r » 0 

1234567812345678123456781234567012345678 
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Für ein Scrolling nach rechts müsste das Ganze natürlich in 
umgekehrter Reihen-Folge ablaufen. 

Hier ist nun auch der Zeitpunkt gekommen, wo man auf den weiteren 
Gebrauch von Easic - Routinen verzichten sollte. Eine Maschinen¬ 
routine ist nicht nur wegen der schnelleren Ausführungszeit zu em¬ 
pfehlen, sie bietet auch die Möglichkeit, das Scrolling im Inter- 
t auiaufsn zu lassen* Dies bringt folgende Vorteile s 
x. da=> oc." Diling in der Zeit geschieht, in der kein Bild 

dargfcfstfcrl1t wird, können keinerlei Bildstörungen auftreten. 

2. Da ein Interruptprogramm völlig unabhängig vom HauptProgramm 
laufen kann, brauchen wir uns nach dem Start nicht mehr weiter 
darum zu kümmern. 

Für diejenigen, die noch nie etwas von Interrupts o.ä. gehört 
haben, hier eine kleine Erklärung : 

Als Interrupt bezeichnet man die Unterbrechung der Arbeit der CPU, 
durch ein externes Signal ( in unserem Fall die BiIdaustast1ücke C 
Vertikal Blank ), die alle 1/50 Sekunde ausgelöst wird), 
wo? auf hm die CPU ein ganz bestimmtes Masch i nen programm ( eben die 
Interruptroutine ) abarbeitet. 

Es gibt beim Atari zwei verschiedene Vertical - Blank Interrupts : 
immediate ( direkt, sofort ) und deferred ( das heisst soviel wie 
aufgeschoben ). 

Immediate VBI's werden immer ausgeführt, deferred werden nur ausge¬ 
führt, wenn gerade keine zeitkritische Operation durchgeführt wird 
( z.B. Ansprechen von Disk, Drucker usw. ). Für die Interruptrou¬ 
tinen, die etwas mit Graphik zu tun haben, sollte man immer den 
immediate VBI benutzen. 
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Hier noch ein paar wichtige Adressen -für den Gebrauch von VBI's : 
54286 — £D40E NMIEN Non liaskable Interrupt Enable. 


Hier muss Bit 6 gesetzt sein, 
damit VBI's ausge-führt werden. 


546 

- £0222 VVBLKI 

VBLANk immediate Register 



547 

- £0223 

Dies ist der Vektor für den 

immediate 

VBI. 

548 

- £0224 VVBLKD 

VBLANK deferred register 



549 

- £0225 

Dies ist der Vektor für den 

deferred 

VBI. 


Immediate VBI's müssen mit dem Be-fehl JMP £E45F abgeschlossen 
werden, deferred VBI's mit JMP £E462. 

Für die Leute, die noch keine Ahnung von Maschinensprache haben, 
ist im Bemoprogramm Nr.4 eine Interruptroutine enthalten, die auch 
so verwendet werden kann; sie läu-ft mit allen Graphicmodi, die 40 
Bytes pro Zeile verwenden, allerdings müssen Sie sich dann eine 
entsprechende Bisplaylist selbst erstellen. 

Nun noch ein paar Worte zum Erstellen von Landschaften : Grundsätz¬ 
lich sollte man möglichst auf den Gebrauch hochauf1 äsender Graphik 
verzichten, da der Speicherbedarf einer bildschirmfüllenden Graphik 
immens ist ( bei 192 Zeilen und einer Breite von 256 Bytes wären 
das rein theoretisch 48 KB ) . 

Besser sind da die Antic - Textmodes < 2,4 oder 5 ). Besondere 
Beachtung sollte man dem Übergang vom Ende zum Anfang der 
Landschaftsdaten widmen. Es ist nicht möglich, einfach über den 
ganzen Speicherbedarf zu scrollen. Was dann passiert, zeigt uns 
Demo #2 : Der erste Teil der Landschaft scrollt am Ende um eine 
Zeile versetzt ins Bild, da Antic nun die Pagegrenze überschreitet 
und sich Daten holt, die eigentlich nicht für diese Zeile bestimmt 
sind. So geht das also nicht. 

Im Demoprogramm #4 wurde eine andere Technik: angewandt : Es wird 
nicht mehr der gesamte Speicherbereich durchscrol1t, sondern es 
wird bereits auf den Anfang des Bildes umgeschaltet, bevor das Ende 
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erreicht wird. Hierzu müssen sich natürlich am Ende der Landscha-ft 
die gleichen Bilddaten befinden wie am Anfang, damit man den 
Sprung nicht bemerkt. 

Beispiel ; 

Nehmen wir einmal an, die Breite des Bildschirms würde 4 Bytes 

entsprechen und für den Bildbereich 16 Byte reserviert sein. 

Dann müsste man das Bild in einer Zeile folgendermassen aufbauen: 

ABCDEFGHIJABCDEF A - J : Beliebige Datenbytes 

8123456789111111 Byte 

012345 

Beim Coarse - Scroll würde der Zähler der LMS - Anweisung dann 
immer die Werte von 0-9 durchlaufen. 

Es ist wichtig, dass man am Ende 6 (4+2) Bytes und nicht, wie man 
vielleicht vermuten könnte, 4 Bytes mit den Anfangsdaten füllt. 
Das liegt daran, dass beim Finescroll Bytes ja auch nur teilweise 
im Bildfenster erscheinen können. 

Im Demoprogramm 3a wird gezeigt, wie Fine- und Course Scrolling 
kombiniert werden und wie unbemerkt vom Ende des Bildes auf den An¬ 
fang umgeschaltet wird. Hier sieht man schon, dass das eigentlich 
nur noch in Maschinensprache möglich ist. Wenn Sie den POKE 559,0 
weglassen, sehen Sie, wie das Bild wackelt. ( Mit POKE 559,0 wird 
während des Umschaltens der Bildschirm ausgeschaltet ). In Maschi¬ 
nensprache könnte man diese Operationen während des VBI unbemerkt 
ausfUhren. 

Im Demoprogramm #4 wurden am Ende 42 (40+2) Bytes mit den Anfangs¬ 
daten gefüllt ( Zeile 210—240 ). 

Der Zähler in der VBI - Routine läuft dementsprechend die Werte 
von 0 bis 213 ( Zeile 10080, Byte #3 ) durch. 

Diesen Wert müssen Sie verändern, wenn Sie die Breite Ihrer Land¬ 


schaft verändern wollen. 
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Auf vertikales Scrollen wurde hier nicht weiter eingegangen, da 
dies zum einen nicht so häufig verwendet wird, zum anderen müssten 
Sie sich das auch selbst beibringen können, da es prinzipiell 
genauso abläuft und die Speicherorganisation wesentlich einfacher 
ist. 


iS 

REM 

GCMGZ £. Z MG 

20 

REM 


—TTi 

CDADUTTC 

Lf: in« i i 1 i_-J äJ 

60 

POKE 

■?=; r :< -i « p-etfvt z~- o n .0 n ? i c- 

/ -Jx. k x = r\£_s * «.-'jn-jvn .-hu v.» 

97 

REM 


90 

REM 

TEXT ?NITIALISITRUHG 

QP 

REM 



Z7E/1?0 Y# Z 


110 

■? 


150 


T“ Y ~ ± f 1 *i % — •* 

5 !— A S \ JL ? JE. .* — 


TlTVT -ir f \ 
i !— i \ -C -—l f 

6 m 

i £ S 

TEXT* <255> =" ":REM 
TEXT*(2)=TEXT*:REM 
REM 

TEXT*(4S,132)="Hori 
sehr 


I—f / C T f~‘ J—. ^ <—t -I— i 4- i —, t j—. 

23 ri *__? -l. L_- uiirccl. eine 

f 4 —— \ __ ?I 

l. i — 2 - c * X-X-W - 

immer acht 

rrVT .nnC-.E- 
f c a f nw u rsüf £_ 


STRING 


FUELLEN 


schlechte Bild 


-=.i- 


URG 

1 O” OETfvf 


da die l^ildschiE 
Pixel 


quäl 
ntäusg 
h Dbsn 


it 5tring J 
taet 5 " 


ionsn in 

!_ s_ , T r- - T—.z.— 

i Is ü; U szzj 


Wli 


REM 

REM 

FÜR 


199 
2S0 
.210 

228 PRINT TEXT*CI 
233 NEXT I 
240 GOTO 230 


1=1 TO 215 

i 

¥ * 


39) 


13 REM SC/?£?£ £- 2" MG — GETMG # — 

T.f* E>|TM ^ 

133 GRAPHICS 0:SETCOLOR 4,1,05SETCOLOR 2,1,0:SE «CuLOE 1,3,8 
107 REM . 

1058 REM NEUE DISPLAY LIST ERSTELLEN 
xm REM - 
140 DL= 1536 

120 FOR 1=3 TO 2:POKE DL,112:BL=DL+1:NEXT I 

130~FQR 1=3 TO 235POKE DL,66:POKE DL+1,3:POKE DL+2 ,120+I:BL=Bl+. 

MC V J T 

140 FOR 1=0 TO 2:READ AsPOKE DL,AsDL=DL+lsNEXT I 
145 DATA 65,0,6 
147 REM 

143 REM LANDSCHAF! ERSTELLEN 

149 REM 

150 Y=12 

160 FOR X=0 TO 255 

170 Y=Y+SGN C RND < 0)—0- 5):ST=120*256+X 
180 FOR A=Y*256 TO 23*256 STEP 256 
190 POKE ST+A,128:NEXT A 
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203 NEXT X 

247 REH 

248 REH DISPLAYLIST AKTIVIEREN 


249 

REH 


258 

c*nL.-Tr 

i ur-.u 

560,8:POKE 561,6 

297 

REH 


298 

REH 

SCROLLING - ROUT. 

299 

REH 


TfÄsS 

FOR 

X=0 TO 215 

318 

r\? ~ i ” /i ra 

TOffl 

iU 

FOR 

Y=8 TO 72 STEP 3 

333 

POKE 

DL+Y,X:NEXT Y:NE 

348 

GOTO 

388 


/?/?££. Z MG — DE/fO # 3 
iß GRAPHI CS 8:DL=PEEK<560)+256*PEEK<561> 


1 RPM ZZ.: 

2 REH 


17 

REH 


iS 

REH 

DISPLAY LIST VERAENDERN 

1 V 

REH 


“f* 

POKE 

DL,64+16+7iPOKE DL+1,3:POKE 

27 

REH 


78 

REH 

TEXT EIHPOKEN 

OO 

jäL / 

REM 



DIH 

(4S) 

48 

A*=" 

FINE-SCROLLING TEXT“ 

58 

FOR 

1=1 TO LEN() 

60 

POKE 

1536+1, ASC ( ß.t- (I , I > ) -32: NEXT 

97 

REH 


98 

REM 

SCROLLING - ROUTINE 

99 

REH 



100 FÜR 1=8 TO 15 
135 FÜR J-l TO 28:NEXT J 
118 POKE 54276,1:NEXT I 
128 FOR 1=14 TO 1 STEP -1 
125 FOR J=1 TO 28:NEXT J 
138 POKE 54276,1;NEXT I 
148 GOTO 188 


' .1 REH _ SCÄOL JL IMG — 7 #3 ^ 

---- 2 REH 

18 GRAPHICS 3:DL=PEEK(568)+256*PEEK{561) 

11 SETCOLÖR 0,13,12:SETC0L0R 2,3,4 

17 REH 

18 REH DISPLAYLIST VERAERDERN 

19 REH 

28 POKE DL,64+16+7:POKE DL+1,0:POKE BL+2,6 

27 REH 

28 REH TEXT EIHPOKEN 

29 REM 

30 DIH A${99) 

40 AT=" FINE-SCROLLING TEXT PRAESENTIERT VOM 4TARI CLUB DUESSELDO 
RF FINE-SCROLLING TEXT “ 

58 FOR 1=1 TO LEN(A$> 

68 POKE 1536+1,ftSC(A*(I,I))—32:NEXT I 
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“ T DETM 

r' / I Vi-.l ! 


SCROLLING - ROUTINE 


99 REM 
130 FOR 
105 FOR 


TO 0 STEP -1 


T-i^ “fj 

j=i TO 13:NEXT J 

110 POKE 54276,1:NEXT IsPOKE 5t>9,0 

111 BI =B I +2: POKE 54276,15: POKE DL* 1, BI: PuKfc 559, 34 

112 IF BI=62 THEN BI=0:POKE BL+1,3:POKE 54276,15:7 
GOTO 130:REM UMSCHALTUNG VOM ENDE - ZUM ANFANG 

113 POKE 559,34:GOTO 133 
120 FOR 1=14 TO 1 STEP -1 
125 FOR J=1 TO 20sNEXT 3 
130 POKE 54276,1:NEXT I 
140 GOTO 100 


"Umschaltung" 


*5 Fh Ö J-- fv? 

.S. \ —* i 




S C79Ö6 6 -ü - 

2 g REM 

133 GRAPHICS 03 SETCOLOR 4,1,3:SETCOLOR 2,1,4sSETCOLOR 1,0,8 
135 SOSUB 7333:REM VSI-ROUTINt 
1 07 Fi E li 

ISS REM NEUE DISPLAY LIST ERSTELLEN 
139 REM 

113 DL=1536:RESTOHE 

123 FOR I=S TO 2:POKE DL, 112 :DL=DL+1:NEXT i 

125 CHR=15:REM 15=SRAPHICS 8 , T ^ 

i “ a 0 FOR 1=0 TO 23= PÖKel üL,64+16+CHRsPuKt DL+i ,ls 3 s PliKb. DL^-^? - A 1 ~ 

=DL-«’35^EXT I 

143 FOR 1=3 TO 2: READ AsFUKfc. BL,tt:ÜL=DL+I:NtXi * 

145 DATA 65,3,6 

147 REM 

148 REM LANDSCHAFT ERSltLLEN 

4 #? O DCTM 

J. “ - 5 » 

153 Y=12 

163 FOR X=3 TO 255 
70 Y= Y+S 8 N < RND < 0) -3. 5 ) : ST=123*256-?- X 


180 

FOR A 

=Y*256 TO 23 

*256 STEP 256 

193 

POKE 

3i+A 5 2DDS Nt X 

T A 

283 

NEXT 

X 



REM 



“r.’sO 

=L-L-? wi 

REM 

/ syntirHAFT ft 

ORRIGIEREN 

209 

REM 



213 

FOR I 

=8 TO 41 


220 

FOR V 

r = 120*256 TO 

143*256 STEP 

230 

POKE 

Y+214+I,PEEK 

:(Y+I) 

24Ö 

NEXT 

Y:NEXT I 


247 

REM 




-REM 

DISPLAYLIST 

AKTIVIEREN 

249 

REM 



25S 

POKE 

563,3:POKE 561,6 


REM 



298 

REM 

SCROLLING - 

ROUTINE 

299 

REM 



333 

A=USRC256):REM FBI AN 

313 

GOTO 

318 



6973 REM 

6983 REM VBI—ROUTINE ERSTELLEN 
6993 REM 

7333 RESTORE 13SSS:SUM=8 
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/0iiü 
T 0~'0 


« FÖR 1=256 TO 35=9 
READ A:POKE I,A 


3UM ; 


-Ci 5* 

*JUf 

T 


CHECKSÜMs IF CHECKSUMC >SUM THEN ? “DATA-FEHLER” .* END 


007!» 
-- / j r £j 

99Bß 

9990 


DiTT! !DK 1 

I \i_ I U! MS 

pCr|yf 

REH 
REH 


10000 

DATA 

i Tn £3 Uü -T~* iü’ 74. *? IAO 1 

x a-F^r rj x w / ^ x x. ^ x —r x ^ 5 ~ ^ 4 . ; ; i w? / =* ~ 

18010 

DATA 

i ja 4 -rer OjL 7“ 4 CTG 7*7 4 “7*7 

Ä T X £ ‘i—f ^ .<» j / 5 — > | / 4. ? X =J - X- < 4 / 

10820 

RATA 

X/r“; * £T 

/s i—j 1 -i npj-? -| t! n “ 4 TT 

'tu 5 i | x -2'-2= q 2. >2-2 S g x / -2» ? -j / ? ? x 

18838 

DATA 

204, i60,0,193,2*35,177,203 

18040 

DATA 

65,240,61,41,240,201,80,2= 

10850 

DATA 

i n Ofa -i 7i 79 j - 5 *? 

t_* r| w.i._ q r W X = r ij J— / ^ A q *Ji- 

18060 

DATA 

OsTT? 4 i iCT T?ra=7 /? 1 ~ ^ Ai A 

/ t OJ‘ 3 X g X Lfv-* 5 XK- ! -' } -f 1 ? j ± s X t; -T- 

10070 

DATA 

— •! — -jft-i ” oara “ oftp *q i?‘ 

ü A. 3 Xü i. ^ ■_•• q, -- = X. 3 * i vj J A r 

i mcniz-m 

X 'X* 

DATA 

-,ra*7 —-754 1 “ v* /Is~ Q •“»/* 4 

xal-- ? . 2-0 2 5 ilL f xL'T«-? 5 sj :• -w-r 5 x tfw ? 

■i nt ca oft 

X S.5«.? -- »X* 

DATA 

•* ,.icr t?sT*T 7 £, O 4 4 1 iQ fS 4 /I 

i ,a -r^ * _a*Llü 2 > q ;ö 5 dl 5 2 5 x O / $ «x 5 x Tw 

10100 

n/ETA 

L--ri i r-i 

— iTi“ CD =7% -! T “ Oi75 4 “7 2 

X. -.*X_ 7 «Xf 5 X 5 - : X 5 / X' ? J. ? / i- 

10113 

r>ü“f 0 t 

v*o -? ofsrs v»r»D “ -* 7 *t»t v*!7i4. 9A 

X ;' <; i ^ .X.SSXSX <3 X.ttJW 3 X ? i'-'-J q X-S£JT ? - i_f 

■j fSi '“37% 

3. *X‘ X X.X.« 

DATA 

■imÄ 4 2 p 4 s 7?4 72 Q~; 77g 9s g 

s£j *7 ^ i. L.-xJ ^ i- ruje^T Sj / ;— 4 ä J -i—F ^^ 2 W q «tJ 

i rs i Tn* 
x 4 ? i -_ s •••:.* 

n/\TA 

L-fr - ? • ri 

4 0*2 0*7 

X iUU‘ / 


Bouiree Code? der VB X Routine 


i r=s_- i-J « iu = 


SiBsö 
01 IS 


0140 

0150 

ra*§ jLf7» 

U J. O'jLf 

0170 

0180 

0190 

-0200 

0210 

B220 

0230 

0240 

0250 

0260 

0270 

02S0 

0290 

0300 

0310 


—- T — i—■ Sv S —f- S -E 

£ .. € F « -x-B £ S £ 3 t 

ISiliEDIATE VBI 
BY THOR - 4/11/84 


fCRGCL 


=== PROSRAHMSTAR! 
*= *0100 
=== ADRESSEN === 


COUNT = *CB 
WBLKI = *@222 
DL = *0230 

HSCRÖL = *D484 


VBI INSTALLIEREN 
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0320 

5 



0330 

PLA 


? ANZAHL BYTES 

3340 

LDA 

# <VBLANK p 

0350 

STA 

VVBLKI 

; INSTALLIERE 

0360 

LDA 

# >VBLANK pVBI-VEKTOR 

(ITT ß* 

/ sl* 

STA 

VVBLKI-M 

5 

0380 

RTS 


m DAS WAKÜ - e . 

0390 

J 



0400 

--s sr. 7 „ pr-i !*T 

5 --- VU»A |\u s 

T hier- 

AiMt»- 

rs/i i f» 

'UTifti 

i 



0420 

VBLANK 



ä7i/3 s'S 

PHA 


% AKKU RETTEN 

0440 

TYA 


? Y-REGISTER 

3450 

PHA 


.RETTEN 

0460 

LDA 

DL 

P AKTUELLE 

3470 

STA 

DL IST 

; DISPLAYLIST 

(5400 

LDA 

DL +1 

jERMITTELN 

tZ?- s 4 ,t '? *5 

STA 

DLIST*! 

» s r?!r«crü5r 

? *_?i_ : {«_ 

f£«s?raf» 

L.DY 

#$00 

= nr „7CTCCD 1 fl!.! 

c. X/t X— i -E. ?—t i « \ 1 w V« 

fÄcr ■? f» 
«.<•_> X SL! 

DEC 

r'rsi fK«-r 

p DEC ZAEHLER 

«Tr — 

SEARCH 



0533 

LDA 

(DLIST) , 

Y iHOLE DL-BYTE 

0540 

CHP 


pIST ES JHP(65)? 

SJ-_?w«C? 

BEO 

ENDVBI 

; JA, DAS WftRS. . 

0560 

AND 

#$F3 

pIST ES LHS HIT 

0570 

CHP 

#$50 

p HSCROLL? 

0580 

Dtrn 

FOUND 

* 7.A 1 

5 vn . 

0590 

7 cp 

XNCREASE 

p NEIN, ERHOEHE 

0600 

JHP 

SEARCH 

p ZEIGER, TRY AGAIN. 

0610 

FOUND 



«7s .ü “sT? 

JSR 

1 NLKEfiub 

iERHOEHE ZEIGER 

ffiiTlÄ 

RJ W-_«KJ 

LDA 

COUNT 

pHQLE ZAEHLERWERT 

f" 6 4 iS 

•isJ *_f ~T KJ 

AND 

mmz 

pMASKIERE 2 BITS 

0650 

STA 

HSCROL 

pSPEICHERE BITS 

0663 

CHP 

#$03 

- uünKbil bCR.ULL. ^ 

ni£.-7ES 
tti«_F / GJ 

BEQ 

COARSE 

P WENN 3 SONST 

0680 

BNE 

EXIT 

pWEITER. . . 

0690 

COARSE 



au« / tu.-«- 1 

LDA 

( BL. iS;) ? 

Y p HOLE LHS LOW 

3710 

CHP 

*T 

TTU. j. 

; VON- VORNE,WENN 

0720 

BEQ 

NEUSTART 

=213 ERREICHT 

iTr / 6 ra 

Ri «* -JKJ 

r*i n- 

•—r £ — t_f 



3740 

ADC 

#$0i 

p ERHOEHE 

3750 

STA 

(DLIST), 

Y p LiiS-LOW 

0 /i>3 

JHP 

EXIT 


3770 

NEUST ART 


37-80 

LDA 

#$00 

;SETZE LHS—LOW 

3790 

STA 

(DLIST), 

Y p AUF 0 

0830 

EXIT 



3310 

— JSR 

XNCREASE ;ERHOEHE 2-HAL 

0820 

JSR 

INCREASE ;DL-ZEIGER 

0830 

JHP 

SEARCH 

p'JND SUCHE WEITER 

0840 

XNCREASE 


0850 

INY 


PERHOEHE ZEIGER 

0863 

BNE 

NOCORR 

pFRUEFE AUF UEBERTRftS 

3870 

INC 

DLIST+1 

;ING HIGHBYTE 

0880 

NOCORR 



0890 

RTS 



0900 

ENDVBI 



0910 

PLA 


PY-REGISTER 

0920 

TAY 


;UND AKKU 

0930 

PLA 


p WIEDERHERSTELLEN 

3940 

JHP 

$E45F 

;VBI—EXIT 

0950 

» END 
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Page Flipping 

Wenn Sie den Artikel über die Displaylist durchgearbeitet und 
verstanden haben, müsste dieser Artikel eigentlich sehr einfach 2U 
verstehen sein. Ohne Kenntniss der Displaylist ist es schwieriger, 
da wir ja nicht nochmal alles wiederholen wollen. 

Page Flipping ermöglicht Ihnen, mit relativ wenig Aufwand, schnell 
zwischen mehreren, im Arbeitsspeicher befindlichen Bildern hin- und 
herzuschalten. 

Dies deshalb, weil im Atari kein fester Speicherbereich für den 
Bildspeicher existiert. Der Bildschirm ist eigentlich nur ein 
Fenster, das über einen bestimmten Speicherbereich gelegt wird. 
Somit ist es auch möglich dieses Fenster nacheinander über 
verschiedene Speicherbereiche zu legen. Der Speieherinhalt wird 
nun auf dem Bildschirm angezeigt. Genau das ist Page Flipping. Wie 
wir wissen, existiert für das Bild im Speicher eine Displaylist. 
In dieser steht drin, wo die Eilddaten stehen, wie das Bild 
aufgebaut werden soll usw. Diese Displaylist befindet sich meist 
vor dem Anfang der Bilddaten. Um nun verschiedene Bilder 
abspeichern zu können, müssen wir den Computer überlisten. 
Normalerweise wird der Atari bei Aufruf eines Graphiesmodes die 
Eilddaten an das Ende des verfügbaren Speicherbereichs setzten. 
Wenn-, wir dem Computer nun weis machen können, er verfüge über 
weniger Speicherplatzi wird er die Bilddaten an eine niedrigere 
Stelle setzen. Genau dies können wir tun. In der Speicherzelle 106 
befindet sich die zur Verfügung stehende Seitenzahl. ( Eine Seite 
entspricht 256 Byte ). Angenommen wir wollen zwei GRAPHICS 8 
Bilder im Speicher haben. Wir gehen dann wie folgt vor: 
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1. Merken der ursprünglich vorhandenen Seitenzahl. 

2. Merken des Anfangs der Displaylist von Bild 1 

3. Zeichnen von Bild 1 

4. Von dem in 106 gespeichertem Wert wird nun 32 ( 32*256=8192 

Byte ) abgezogen, da ein BRAPHICS 8 Bild 8 K braucht. Dieser Wert 
wird nun wieder in 106 hineingepcked. Der Computer denkt nun, ihm 
ständen SK weniger zur Verfügung. 

5. Beim erneuten Aufruf eines GRAPHICS 3 Fensters, werden die 
Displaylist und die Bilddaten um 8192 Byte niedriger angesiedelt. 

6. Zeichnen eines neuen Bildes. 

7. Merken des jetzigen Displaylistanfangs. 

8. Wenn jetzt abwechselnd auf die beiden Display!ists zugegriffen 
wird, ändert sich auch das jeweilige Bild. Die Mitteilung wo sich 
die neue Displaylist befindet, wird in den Zellen 560 und 561 
abgelegt. 

Probieren Sie ein bisschen herum. Sie können natürlich nicht nur 
zwei, sondern je nach vorhandenem Speicherplatz und beötigtem 
Speicherbedarf viele viele Bilder auch verschiedener Graphikmodi 
abspei ehern. 

Anzuwenden ist Pageflipping bei Spielen ( verschiedene Szenen ), 
Geschäf tprogrammen ( Umschaltung zwischen Balkendiagramm, 
Kurvendiagramm und Statistik ) usw. 

Schauen Sie- sich jetzt das BeispielProgramm an. Es schaltet 
ständigjzwischen zwei Graphics 7 Fenstern und einem Graphics 0 
Fenster um. Als Besonderheit ist das Graphics 0 Fenster noch mit 
einer Displayliständerung ausgestattet. 



- 46 - 


0 REM Page Fl ipping Demo 

18 GRAPHICS 7 
38 A=PEEK<106> 

48 DLISTL1=PEEK<568):DLISTH1=PEEK(561) 

45 FOR 1=8 TG 58:C0L0R RNDC8> *4+ 1:PLOT 38,48:DRAWTÖ RND(8)*159,RN 
D(8)*93;NEXT I 

46 7 "üSeite 1” 

53 POKE 186,A—32 
63 GRAPHICS 7 

78 DLISTL2=PEEKC563);DL13TH2=PEEK(561) 

72 FOR 1=8 TO 58:C0L0R RND(8)*4+1;PLOT 8ß,40sDRAWTO RND(0)*159 ,hN 

n / m \ r wer vt t 

U \ / « • «Jfs 5 HL. A I ± 

73 ? "üSeite 2" 

138 A=PEEK(186):POKE 136,A-32 
118 GRAPHICS 8:DL=PEEK(568)+256*PEEK C561) 

123 POKE DL+O,6:POKE DL+9,7:POKE 82,0:DLISTH3=PEEK{561):DLISTL3=P 
EEKC56S) 


133 POSITION 8,3:7 " 


DAS 


pag-e -flipping“ 


148 POKE DL+12,3;POKE BL+14,8?POSITION 8,6 
X 03 7 f * Lin bupsrhonus bsiBi Atsn 

168 POSITION 2,18:7 "Seite 3” 

193 POKE 561,DLISTHlsPOKE 568,DLISTL1:SOUND 8,283,18,B:FOR T=1 TO 
230:NEXT T:POKE 561,DLISTH2:POKE 56B,DLISTL2 

195 SOUND 8,138,10,8:FOR T=1 TO 288:NEXT T:POKE 561,DLISTH3:POKL 
568,DLISTL3:SOUND 8,168,18,8 

196 FOR T=1 TO 288;NEXT T 
288 GOTO 198 


Schneller Eingabemodus 

Wenn beim Atari eine Taste länger als 1 Sek, gedrückt wird, 
Bdsrhoit sicn diese Funktion» Manchmal ist oiese vsrs^siidaue: 
von 1 Sek» doch ziemlich lang» XL Besitzer können die 
Geschwindigkeit in der Speicherzelle 738 ändern. Besitzer von 
älteren Model 1 er. müssen das nächste Programm, eintippen um den 
gleichen Effekt zu bekommen. 


28 

33 

48 

68 

78 

OfTi 

L-'fSJ 

98 


HEfTschnel X erer EZi n cg sfa emod 

REn durch ändern der Zahl 18 in Zeile 98 gehts noch schneller 

FOR R=256 TO 292 

READ B:POKE R,B:NEXT R 

POKE 255,134 

X=USR(255) 

DATA 163,22,162,1,169,6,32,92,228,169,3,133,2,169,1,133,3,169 
DATA 3,133,9,96,173,43,2,281,11,144,2,169,10,141,43,2,76,95,22 
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Kopieren von geschützten Diskproarammen 
Anleitung -Für die Diskstationen 810 und 1050 

Jeder Diskettenbenutzter hat sich garantiert schon darüber 
geärgert, dass sich viele Diskprogrämme nicht einfach so kopieren 
lassen. Die Disketten sind meist mit zerstörten Sektoren und/oder 
geänderten Formaten 'ausgerüstet'. Nur mit Software lässt sich 
dies nicht simulieren. Dazu ist schon eine Portion Hardware nötig. 
Dass wir hier nicht eine Bauanleitung für eine Happy oder einen 
Archiven veröffentlieben, ist wohl klar. Aber viele Programme 
lassen sich mit folgendem kleinen Trick trotzdem kopieren und dann 
auch erfolgreich starten. Dazu werden nur zwei Teile benötigt. Ein 


Schalter und 

eine normale Diode 

< IN 

4143 

Lj . ä . 1 


Als Anzeige, 

in welcher Stellung 

si dH 

der 

Schalter 

befindet, lässt 

ei ch 

ohne 

weiteres noch eine 

LED 

einfügen. Sie 

wird dann mit 

ei riem 

220 

□hm Widerstand 

an 

den 

Ausgang 

des 5 Volt 


Spannungsreglers angeschlossen. 

Da sich per Software ein defekter Sektor nicht erzeugen lässt, 
machen wir folgendes. Wir schalten zwischen Schreib- und Lesekopf 
beim Schreiben eine Diode. Beim Schreiben geht dann von der zum 
Bchreibkopf gesandten WechselSpannung eine Hslbwelle verloren. 
Dadurch ist dieser Sektor beim späteren Lesen nicht mehr lesbar 
und wird als defekt erkannt. Wie gesagt, lässt sich damit nicht 
jede -.Diskette erfolgreich kopieren, aber bei der Mehrheit 
funktioniert dies einwandfrei. 

Die folgende Software nimmt Ihnen die meiste Arbeit ab. Sie 
arbeiten damit wie folgt: 

Nehmen Sie sich ein Kopierprogramm, das die ganze Diskette kopieren 
kann. Nun kopieren Sie die Disk wie sonst auch. Eventuell 

p.S. Es ist besser statt der Siliziumdiode eine Germaniumdiode zu verwenden. 

Ausserdem sollte man abgeschirmtes Kabel verwenden. 
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auftretende Fehlermeldungen ignorieren Sie einfach. Nachdem Sie die 
ganze Diskette kopiert haben, laden Sie das -folgende Programm ein. 
Nach Einlegen der Originaldisk drücken Sie L und RETURN. Das 
Programm liest jetzt nochmal alle Sektoren und registriert die 
defekten. Als nächstes wird die Destination Diskette eingelegt, 
der Schalter betätigt und wiederum RETURN gedrückt. Nun zerstört 
das Programm sämtliche registrierten Sektoren. 

Damit Sie bei öfterem Kopieren nicht jedesmal die Originaldisk 
durchlesen müssen, besteht die Möglichkeit, die einmal registrier¬ 
ten Sektoren auszudrucken oder abzuschreiben. Sie geben dann beim 
nächsten Mal nur noch die zu zerstörenden Sektoren ein. Doch nun 
zur Bauanleitung : 

Diskstation 810 

1. Lösen sämtlicher Kabel von der Station. 

2. Abnehmen der 4 Plastikplättchen auf der Oberseite der Station. 

3. Lösen der darunter1iegenden 4 Schrauben. 

4. Abnehmen des Deckels. 

5. Lösen der 5 gekennzeichneten Schrauben ( X ). 

6. Abnehmen der Frontblende. 

7. Nach Abnahme des Atarizeichens < festgeklebt ) von der Front, 
wird ein passendes Loch für den Schalter und eventuell für die 
LED gebohrt. 

8. Anlöten zweier Drähte an die gekennzeichneten Stellen. ( 0 ) 

9. Anlöten der Diode und der beiden Drähte an den Schalter. 

10. Von Punkt 6 rückwärts ausgehend die Station wieder schliessen. 

11. Fertig. 



Diskstation 1050 

1. Lösen sämtlicher Kabel von der Station, 

2. Lösen der 6 Schrauben auf der Bodenplatte. 

3. Abnehmer» der Frontblende. 

4« Abnehmen des Deckels. 

5» In die Frontplatte wird links ein passendes Loch für den 
Schalter und eventuell für die LED gebohrt. 

6. Hochklappen des Laufwerks. C X ) 

7. Jetzt gibt es zwei Möglichkeiten. Entweder man löst die Schrau¬ 
ben auf der Platins* nimmt die Platine heraus und lötet dort 
auf der Unterseite die bei den Drähte fest. Oder man steckt zwei 
Drähte in den vorhandenen Stecker mit hinein. (Man braucht die 
Platine nicht zu lösen ) 

8. Anlöten der Diode und der beiden Drähte an den Schalter. 

9. Die Station wieder schliessen. 

10. Fertig, 

Achten Sie bei beiden Anleitungen auf die richtige Polung der Diode 
und das Sie keine Kurzschlüsse o.ä, veranstalten. 


Disk 1050 


Disk 810 
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Schalter 



f—W—) 


0 REM (c) 19S4 by Atari, Club Düsseldorf 

1 DISKCMD=76B:TRAP 40000:7 :? :? :POKE 710,144:POKE 709,255: 
POKE 712,144:OPEN #1,4,0,"K:" 

2 ? "Lesen oder Schreiben ?";:GET #1,K:7 CHR*(K) 

3 IF K = 76 THEN POKE DISKCMD+2,82:A=1:E=720:GOTO 20 

4 IF K = S3 THEN 6 


5 GOTO 2 


6 7 
r> 


"Von,Bis":INPUT A,E:IF A<1 
"FEHLER":GOTO 6 
"Leqe den Schalter um" 


OR A >720 OR E<1 OR 


1 


720 THEN 


8 POKE DISKCMD+2,87 
20 
40 


POKE DISKCMD+i 


50 

55 

60 

70 


D I M 
DIM 
FOR 


, i 

BUFFER*(128) 


JUMP*(Iß),DEF 


I —0 


(720),R*(1) 
0:DEF(I)=0:NEXT 


ADDR=ADR(BUFFER*) 


BUFFER*(2)=BUFFER* 


SO A H I = I N T(ADDR/256) 

90 ALOW=ADDR-<AHI*256) 
i00 POKE DISKCMD+4,ALOW 

110 POKE DISKCMD+5,AHI 

111 JUMP*(1)=CHR*(104) 

112 JUMP*(2)= CHR*(32) 

113 JUMP*(3)=CHR*(83) 

114 JUMP*(4)= CH R *(223) 

115 JUMP*(5)=CHR*(96) 

116 POKE 776,128:POKE 777,0 
120 FOR SECT=A TO E 

140 SHI=INT(SECT/256) 

150 SLQW=SECT-(SHI*256) 

160 POKE 778,SLOW 
170 POKE 779,SHI 
230 X=USR(ADR(JUMP*)) 

24ß STATUS-F'EEK (DISKCMD+3) 

250 IF S T ATUS=1 THEN GOTO 280 
260 7 -"Sektor “;SECT;" defekt" 

270 EXEF (SECT) =1 : GOTO 290 
280 2” Sekt or “;SECT;" O.k." 

290 IF JU=0 THEN NEXT SECT:GOTO 292 

291 NEX_T_ I 

292 IF K <>76 THEN 300 

293 7 “Lege Destination Disk ein, lege den Schalter um und d 
ruecke RETURN I NPUT R*:F’OKE Dl SKCMD + 2,87 

295 FOR 1=1 TO 720:IF DEF(I)=1 THEN A=I:E=I:JU=1:GOTO 120 

296 NEXT I 

300 7 "ü Defekte Sektoren : 

310 FOR 1 = 1 TO 720: IF DEF(I)=1 THEN 7 "Sektor "; I 
320 NEXT I 
323 TRAP 400 

330 LPRINT " Defekte Sektoren : 

340 FOR 1 = 1 TO 720: IF DEF(I)=1 THEN LPRINT “Sektor " ; I 
350 NEXT I:RUN 

480 7 "Kein Drucker angeschlossen":RUN 
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Wie schütze ich meine Programme vor dem Kopieren ? 


Das unerlaubte Kopieren von Software ist zu einer Modeerscheinung 
geworden. Solange man Programme von anderen kopiert, ist das ja 
noch recht angenehm. Schliesslich kostet einem das so erworbene 
Programm nichts. Anders ist es allerdings, wenn man selbst der 
Programmierer eines Programms ist und dieses verkauft. 

Wenn das Programm nicht geschützt wurde, kann man damit rechnen, 
dass es spätestens 1 Monat nach erscheinen, im Eesitz von ca. 50 V. 
aller Computerbesitzer ist. Dies ist natürlich äussertst 
ärgerlich, da so die potentiellen Käufer bereits beliefert sind. 
Deshalb werden F'rogramms geschützt. Die professionellen 
Softwarehäuser versuchen ständig, neue Schutzroutinen zu 
entwickeln. Die Softwarsvertreiber rechnen nun damit, dass der 
Schutz ca. 2 Monate hält. In dieser Zeit wollen Sie den Grossteil 
der kalkulierten Einnahmen bereits eingenommen haben. Deshalb die 
hohen Softwarepreise. Wie kann nun Otto Normalatarianer sein 
Programm gegen unerlaubtes Kopieren schützen'? 

Es gibt mehrere Möglichkeiten : 


1. Listschutz 

Damit nicht jeder die folgenden Massnahmen ausser Kraft setzt, 
benutzen wir nun einen Listschutz. Vor dem Abspeichern lassen wir 
folgende Programmzei1e durchlaufen : 

32003' A=PEEK (130) +256*PEEK< 131) : E=PEEK (132) +256*PEEK (133 ) : 

•_ 'FOR I=ft TO E: F'OKE I,155:NEXT I 

Das nun—abgespeicherte Programm ist nicht mehr lesbar, und auch 
nicht mehr editierbar. 

Weiterhin können wir das Programm folgendermassen schützen: 

32010 POKE PEEK(13S)+256*PEEK(139)+2,0:SAVE'T: NAME.BAS":NEW 
bzw. 

32010 POKE PEEK(138)+256*PEEK(139)+2,0:SAVE"C:":NEW 



das Programm lässt sich nicht mehr mit LDAD"D:NAME" oder CLOAD 
laden, sondern nur noch mit RUN*‘D:NAME" oder RUN“C:". Danach darf 
es nicht mehr durch BREAK oder RESET unterbrochen werden. Falls 
doch, hängt sich der Computer auf. Es kann also keiner mehr in das 
Programm eingrei-fen biw. Änderungen vornehmen. 

2. Ladeschutz 

Damit nicht trotzdem jemand diese Schutzroutinen rückgängig macht 
(es gibt bereits Programme hierfür ), kann man folgenden Trick 
anwenden» 

Als erstes wir eine leere Diskette mit dem DOS 2.3 von Atari 
beschrieben. Dann gehen wir zurück ins Basic und laden das zu 
schützende Basicprogrsmm ein. Nun geben wir POKE 4226,X ein. X ist 
hierbei eine von Ihnen zu wählende Geheimzahl. Das Programm wird 
nun wieder mit SAVE“DsNAME" abgespeichert. 

Es ist nun aus dem Directory nicht mehr zu erkennen. Wenn ein 
Käufer des Programm mittels einem DOS das Directory aufruft, sieht 
er NICHTS. Und ohne Directory kann man auch kein Programm laden. 
Dies geht nur, wenn man vorher die Geheimzahl in 4226 gepoked hat. 
Dies macht man zweckmässigerweise mit einem AUTORUN.SYS o.ä. 

Der normale Wert von 4226 ist übrigens 105. 

3. Kopierschutz 

Als letzte Möglichkeit gibt es den Kopierschutz. Mit den oben 
-genannten Schutzroutinen ist es zwar möglich Programmeingriffe zu 
verhindern (um das Copyright zu entfernen oder die folgende 
Routine - Gsw. ), aber das Kopieren ist immer noch möglich. Wie wir 
in dem Artikel über das Kopieren von Software gesehen haben, ist 
es möglich einen Sektor zu zerstören. Diesen Sektor kann man per 
Software abfragen. Falls er nicht defekt ist < nach unerlaubtem 
Kopieren ohne Hardwarezusatz ), kann z.B. die Diskette formatiert 
werden. Zweckmässigerweise zerstört man auf der zu schützenden 




Disk sämtliche nicht benutzten Sektoren. Bei einem normalen 
Basicprogramm von 150 Sektoren und dem DOS mit 80 Sektoren sind 
immerhin noch ca. 488 Sektoren -frei. Diese werden einfach 
zerstört, Zweckmässigerweise lässt man mitten in den zerstörten 
Sektoren noch einen ganzen, den man auch ab-fragt. Dann ist es -für 
jeden Schwarzkopierer eine Heidenarbeit, sämtliche defekten 
Sektoren zu lesen« 

Achten Sie aber darauf, dass Sie das Directory nicht zerstören. 
Dieses steht in den Sektoren o6jü ms -_>o/ ^cez. _ j 
Die Abfrage eines defekten Sektors erfolgt so: 

18 D=76B:POKE D+2,82 

28 SEKT=618: REM Wert des defekten Sektors 
33 DIM BUFFER*C123),JUMP*C13) 

43 ADDR=ADR(BUFFER*) 

53 AH1=INT(ADDR/256) 

63 ALOW=ADDR-<AH1*256) 

73 POKE D+4, ALOW: F’OKE D+5,AHI 
83 J UMP* (1)=CHR*(134) 

93 JUMP*(2)=CHR*(32) 

133 JUMP* (3) =CHF(* (83) 

113 JUMP*(4)=CHR*(228) 

123 JUMP*(5)=CHR*(96) 

133 POKE 776,128:POKE 777,0 
143 SH1=1NT(SEKT/256) 

153 SLOW=SEKT-(SH1*256) 

163 POKE 778,SLOW:POKE 779,SHI 
170 X=USR(JUMP*) 

188 ST=PEEK(D+3) 

193 IF STOl THEN 533 

233 X=USR<58487) : REM Sektor nicht defekt —> Rsubkopie 

538 REM Hier beginnt das eigentliche Programm 

Es sind natürlich auch mehrere Sektoren abfragbar. 

Natürlich sollte man für eigene Zwecke immer das ungeschützte 
Originalprogramm aufbewahren, denn es können immer mal 

Verbesserungen notwendig werden. 

Trotz dieser Schutzmassnamen ist es allerdings möglich Ihr 
Programm zu kopieren. Und zwar mit dem angegebenen Hardwarezusatz. 
Aber den hat ja nicht jeder. 

Zu empfehlen ist ausserdem die versteckte Unterbringung einer < 
verschlüsselten ) Seriennummer, aus der Sie dann erkennen können, 
welcher Kunde Ihr Programm kopiert und weitergegeben hat. 
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ßraphics 0 Text in vier Farben 

Die Graphikstufe 4 (Antic) ist eine wenig bekannte Graphikstufe 
des Ataris. Genau wie Stufe 0, ist sie in der Lage, 40x24 Zeichen 
darzustellen. Sie hat allerdings dazu noch die Möglichkeit, diese 
in 4 Farben darzustellen. 

Dies ist dadurch möglich, weil der ftnticmode 4 die Sraphikmuster 
anders liest als im Mode 0. 

Graphics Mode 0 liest -für die Zeichen ein Bit auf einmal ein. 
Jedes Bit stellt ein Pixel auf dem Bildschirm dar. Eine i wird 
mit einer anderen Helligkeit dargestellt als eine 0. Antic Mode 4 
dagegen liest zwei Bit auf einmal ein. Jedes Bitpaar stellt hier 
ein Pixel dar. Ein Pixel im Mode 4 ist doppelt so breit wie im 
Mode 0. Da der Atari aber im Mode 0 bei fast allen Zeichen zwei 
Pixel breite Punkte verwendet < ein Punkt (.) ist z.B. zwei Pixel 
breit ), fällt der Unterschied fast nicht auf. Es gibt vier 
verschiedene Kombinationen der zwei Bits s 03, 01, 10, 11. Jede 

Kombination stellt eine andere Farbe dar. Die Farbe des 

Bitpaares S0 ist in der Stelle 712 gespeichert; die des Bitpaares 
01 in 708; 10 in 709 und die Farbe des Paares 11 steht in 710. 

Programm 1 ändert die Displaylist in den Anticmode 4 um. Wenn Sie 
dieses Programm starten, werden Sie feststellen, dass dieser 
Graphicsmode nicht zu benutzen ist. Warum ? Da die Zeichen nicht 
dafür-gedacht., sind um als Bitpaar eingelesen zu werden, sehen 
Sie nur ein Durcheinander auf dem Screen. Um eine praktische 
Nutzung aus dem Mode 4 zu ziehen, muss der Zeichensatz geändert 
werden. Dies geschieht mit dem Programm 2. Die vier Farben 
werden dann durch das Eingeben von den verschiedenen Typen 
erreicht ( Grosschrift, Kleinschrift, CTRL Zeichen und Invers 
CTRL Zeichen ) . Programm 3 demonstriert diese Möglichkeiten. 
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Achten Sie darauf, dass Sie erst Programm 2 laufen lassen, bevor 
Sie Programm 3 einladen. Um nun nicht immer die ganzen DATA's im 
Programm benutzen zu müssen, können Sie den Zeichensatz auch 
abspeichern. Programm 4 saved den Zeichensatz auf die Diskette ( 
erst Progr.2 laufen lassen >. Programm 5 holt ihn wieder zurück. 
Sie können also Ihr Programm mit vierfarbigem Tent ausstatten, 
indem Sie mit Teil 5 den Zeichensatz einladen und dann mit Teil 1 
nach Antic Mode 4 umschalten. Mehrfarbige Schrift sieht allemal 
besser aus als Weiss auf Blau. 


0 REM PROGRAMM 1 

10 DL=PEEK(560)+256*PEEK(561) 

20 POKE DL+3,PEEK(DL+3)+2 

30 FÜR I=DL+6 TO DL+2B 

40 POKE 1,4 

50 NEXT I 


30015 REM PROGRAMM 2 
30110 TOP=PEEK(10t) 

30120 L0WT=T0P-5:POKE 106,LOWT 

30130 GRAPHICS 0:? "BiTtE wArTeN■:SETCOLOR 4,0,0:SETC 
OLOR 1,13,6:SETCOLOR 0,8,8 
30140 Z=30B00:CS=256*(TOP-4) 

30150 H=CS+264:J=H+207:L=30300:K=1:GOSUB Z 

30160 H=CS+520:J=H+207:K=1.5:GOSUB Z 

30170 H=CS+776:J=H+207:K=0.5:L=30560:GOSUB Z 

301S0 H=CS+128:J=H+79:K=1:L=30570:GOSUB Z 

30190 H=CS+8:J=H+55:K=1.5:L=30650:GOSUB Z:H=CS+64:J=H 

+7:L=30560:GOSUB Z:H=CS+72:J=H+7:L=30640:GOSUB Z 

30200 H=CS+256:J=H+7:L=30560:GOSUB Z 

30210 H=CS+S0:J=H+15:K=0.5:L=0:GOSUB Z:H=CS+104:J=H+7 
:GOSUB Z:H=CS+120:J=H+7:GOSUB Z:H=CS+224:J=H+23:GOSUB 
Z 

30220-H = CS+472: J = H+23:GOSUB Z 

30240 H=CS:J=H+7:GOSUB Z:H=CS+496:J=H+23:GOSUB Z 

30300 DATA 4,1,2,3,3,2,3,4 

30310 DATA 4,2,3,2,3,3,2,4 

30320 DATA 4,2,3,5,5,3,2,4 

30330 DATA 4,6,3,3,3,3.6,4 

30340 DATA 4,2,5,2,5,5,2,4 

30350 DATA 4,2,5,2,5,5,5,4 

30360 DATA 4,2,5,5,3,3,2,4 

30370 DATA 4,3,3,2,3,3,3,4 

30390 DATA 4,2,1,1,1,1,2,4 

30390 DATA 4,7,7,7,7,3,2,4 

30400 DATA 4,3,3,2,6,2,3,4 
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30410 DATA 4,5,5,5,5,5,2,4 
30420 DATA 4,3,2,2,2,3,3,4 
30430 DATA 4,3,2,2,3,3,3,4 
30440 DATA 4,2,3,3,3,3,2,4 
30450 DATA 4,2,3,3,2,5,5,4 
30460 DATA 4,2,3,3,3,3,2,7 
30470 DATA 4,2,3,2,2,3,3,4 
30480 DATA 4,2,5,2,7,7,2,4 
30490 DATA 4,2,1,1,1,1,1,4 ' 

30500 DATA 4,3,3,3,3,3,2,4 

30510 DATA 4,3,3,3,3,2,1,4 

30520 DATA 4,3,3,3,2,2,3,4 

30530 DATA 4,3,3,1,1,3,3,4 

30540 DATA 4,3,3,2,1 , 1 , 1,4 

30550 DATA 4,2,7,1,1,5,2,4 

30560 DATA 4,2,3,3,3,3,2,4 

30570 DATA 4,6,1 , 1 , 1 , 1,2,4 

30580 DATA 4,2,7,8,6,5,2,4 

30590 DATA 4,2,7,2,7,7,2,4 

30600 DATA 4,7,8,3,2,7,7,4 

30610 DATA 4,2,5,2,7,3,2,4 

30620 DATA 4,2,5,2,3,3,2,4 

30630 DATA 4,2,7,1,1,5,5,4 

30640 DATA 4,2,3,2,3,3,2,4 

30650 DATA 4,2,3,2,7,7,7,4 

30660 DATA 4,4,4,4,4,4,4,4 

30670 DATA 9,9,9,9,9,9,9,9 

30680 DATA 10,10,10,10,10,10,10,10 

30690 DATA 11,11,11,11.. 11,11,11,11 

30700 POKE 756,TDP—4 

30710 DL=PEEK<560)+256*PEEK(561)sPOKE DL+3,PEEK(DL+3) 
+2:FOR I=DL+6 TO )L+28:POKE I,4:NEXT I 
30720 END 

30800 FOR I=H TO J:READ G:ON G GOSUB Z+20,Z+30,Z+40,Z 

+50,Z+60,Z+70,Z + 80,Z + 90,Z + 100,Z +110,Z+120: NEXT I 

30805 IF L=0 THEN RETURN 

30810 RESTORE L:RETURN 

30820 POKE I,32*K:RETURN 

30830 POKE I,16B*K:RETURN 

30840 POKE I,136*K:RETURN 

30850 POKE 1,0:RETURN 

30860 POKE I,128*K:RETURN 

30870 POKE I,160*K:RETURN 

30880 POKE I,8*K:RETURN 

30890 POKE I,40*K:RETURN 

30900 POKE 1,85:RETURN 

30910 POKE 1,170:RETURN 

30920 POKE 1,255:RETURN 


4 REM PROGRAMM 3 

5 REM Demonstration des Antic Modes 4 
10 DL=PEEK(560)+256*FEEK(561) 

20 POKE DL+3,PEEK<DL+3)+2 
30 FOR I=DL+6 TO LL+20 
40 POKE 1,4 
50 NEXT I 

60 POKE 756,PEEK(106)+1 

65 SETCOLOR 1,13,4:SETCOLOR 2,1,8:SETCOLOR 0,7,2:SETC 
OLOR 3,3,6 
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70 FDR 1=0 TO 20:? "ATARI club ^ mi 4-fn * Hl » — 
club DUESSELDQ RF ‘‘;sNEXT I 

75 FOR J=0 TG 30 

80 FOR 1=14 TD 0 STEP -lsSETCOLOR 1,8,I:NEXT I 
85 FOR 1=0 TO 14:SETCOLOR 1,8,I:NEXT I 

90 NEXT J 

91 SETCOLOR 1,13,4 

92 FOR J=0 TO 30 

93 FOR 1=14 TO 0 STEP -lsSETCOLOR 0,8,I:NEXT I 

94 FOR 1=0 TO 14:SETCOLOR 0,8,I:NEXT 1 

95 NEXT J 

96 SETCOLOR 0,7,2 

97 FOR J = 0 TO 30 

98 FOR 1=14 TO 0 STEP -lsSETCOLOR 2,8,I:NEXT I 

99 FOR 1=0 TO 14:SETCOLOR 2,8,I:NEXT I 

100 NEXT J 

101 SETCOLOR 2,1,C 

110 SETCOLOR 1,2,6.SETCOLOR 2,1,8:SETC0L0R 1,13, 
CÖLOR 2,2,6:GOTO 110 


99 REM PROGRAMM 4 

100 REM CHARAKTER ABSAVEN 

110 C=PEEK(756):C=C*25c:TRAP 160 

120 OPEN #1,8,0, ,, D:CHSET.001 M 

130 FOR 1=0 TO 1023 

140 A=PEEK (C+l > : Pl?T #1,A 

150 NEXT I 

160 CLOSE #1 


100 REM PROGRAMM 5 

105 POKE 106,PEEK<106)-4:GRAPHICS 0 
110 POKE 756,PEEK(106) 

120 C=256*PEEK<106) 

130 TRAP 180 

140 OPEN #1,4,0,"D:CHSET.001" 

150 FOR 1=0 TO 1023 
160 GET #1,A:POKE C+I,A 
170 NEXT I 
180 CLOSE #1 


Kassettenbenutzer müssen bei den Programmen 4 und 5 
folgende Zeilen ändern : 


119 REM Bei Programm 4s 

120 OPEN #1,8,0, "C: 11 


139 REM Bei Programm 5 s 

140 OPEN #1,4,0,"C:" 


irasar 


: SET 
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Atari Funktionstasten 

Hier ist nach ein äusserst nüzliches Programm -für Sie. 

Wie Sie bestimmt wissen, gibt es einige Computer, die 
Funktionstasten haben. Man braucht nur eine Taste drücken und 
schon steht ein ganzer Befehl auf dem Bildschirm. Jetzt gibt es 
ein Programm, dass ermöglicht, etwas ähnliches zu haben. Wenn Sie 
das folgende Programm eintippen, und laufen lassen, schreibt es 
auf eine Diskette einen AUTORUN.SYS. Wenn sich auf dieser Diskette 
ausserdem noch das DOS 2 von Atari befindet, lädt der Computer 
sich automatisch beim Einschalten das Funktionstastenpro— gram 
ein. Zum Glück braucht dieses Programm auch kaum Speicherplatz. 

In den Zeilen 20100 bis 20170 befinden sich die Commandos, die 
nach dem Drücken der jeweiligen Taste mit CTRL erscheinen. Also in 
Zeile 20100 befinden sich folgende Befehle : Mit Drücken von CTRL 
A erscheint auf dem Bildschirm CÜLOR; mit CTRL C erscheint CHRi( , 
mit CTRL D - DATA usw. Wie Ihr seht sind in diesen Zeilen schon 
Befehle vorgegeben. Ihr könnt sie natürlich weglassen und eigene 
Befehle dafür einsetzten. Wie Ihr an Zeile 20160 sehen könnt, muss 
es nicht immer ein Befehl sein. Es kann genauso eine Reihe Befehle 
sein. Wer z.B. ein Frogramm schreibt in dem zig' mal vorkommt 
'X=U3R(1536):ON X GOTO ...' der sollte diese Befehlssequenz einge¬ 
ben." Er erspart sich eine Menge Schreibarbeit. 

Die DATA Befehle müssen mit dem Buchstaben beginnen, bei dem der 
folgende Befehl ausgedruckt werden soll. Danach muss der 
Affenschwanz (Shift+S) kommen. Achten Sie unbedingt darauf, dass 
anstatt einem Komma ein V" eingetippt werden muss ( siehe 20160 ) 
und dass als letzter Befehl 5 mal der Affenschwanz erscheint (siehe 


20170 ) 
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:* ih J 

v 


i SETCÖLOR 4,3,2:SETCOLOR 


; SETC 


33 GRAPHICS 3:SETCOLOR 
OLOR 8,1,6 

98 DL=PEEK(560)+256*PEEK(561):POKE BL+6,7:POKE DL+7,6;DIR 3T(12B) 
,A#(1):POKE S2,0 

136 ? ”3- Der ft tari Club B uesseldorT präg sentiert; at^ri 

FUNKTIONSTftSTEN" :RE!i Unterstrichen = rever“ 


< iiü 
■ = “ ! 


220 

248 

208 

298 


Sollen die Kommandos aasgedruckt werden"; 

128 INPUT A*:IF A$="J" THEN FLAG=i 
193 READ D:IF D<0 THEN 215 
218 CT=CT+i:GOTO 193 

GRAPHICS 8:SETCOLOR 2,8,2:SETCOLOR 4,3,2 
READ Bi : CT=CT+LEN < Bi ) 

IF Siil ,!>="©" THEN 313 

IF FLAGOl THEN ? " CTRL " ; Bi 1 1,13 ; " = ";Si(2>_ 

IF FLftG=l THEN LPRINT " CTRL ";S$a,l>;" = "iBiVZ) 

388 GOTO 228 
—;ic7| CT=CT+7424—6 

333 CTH=INT(CT/256):CTL=CT-CTH*256:PQKE 764,255 

353 '? “Druecke RETURH wenn die Diskette, auf die der ftU' Ok’JN. isV 
S geschrieben werden soll,in Drive #1 ist. ” ; s iNf-UT Pii 
378 OPEN #3,3,8,“D:AUTORUN.SYS”sRESTORE 
398 READ D 
488 
428 
438 
448 

453 GOTO 393 
478 READ 3$:F0R 1=1 TC 
493 D=ASC < Si (I,D> 

588 IF D=A5C<"\"> THEN D=A5C<","> 

518 PUT #3,D:NEXT I 
538 IF Biii ,2)="'ie" THEN 560 
548 GOTO 470 

560 FOR 1=1 TO 7:READ D:PU? #3,D:NEXi I 
578 CLOSE #3:? CHR$(125):? " F E R T I G":ENü 

18348 DATA 2' 

173,9.2.153,102,29,169,44,141,8,2,169,29 


IF D<0 THEN 470 
IF D=5S8 THEN B=CTL 
IF D=501 THEN D=CTH 

C>! !T 4 **? 


,D 


LEN iSit 


255,0,29,500,501,234,160,1,173,3,2,10-3,182,2 V, 283. 


10858 DATA 141,9 


; 1 69 3 500 I 


, 141,231,2,24,105,112, 169,581,141,2-32,2 


133, 


.135,1,133,15,96,00,142,192,29,148,193 

10060 DATA 29,173,9,218,72,41,120,200,4,104,24,144,113,169 = 

245,169,38,133,246,104,41,63,170,189 ^ 

18078 DATA 195,29,2151,255,248,94,133,247,168,0,177,245, lV/,^4, ,^- r 
8,24,201,64,240,08,238,177,245,201,64 _ 

18888 DATA 200,249,280,24,152,liSl,245,133,245,144,228,230,246,2U8 

,224,230,245,200,2,230,246,174,22,220 

13898 DATA 172,23,228,232,208,1,280,142,187,29,140,1SO,29,160,L,* 
77,245,201,64,240i13,140,194,29,32,186 

1 01*88 DATA 29,172,194,29,288,24,144,237,169,0,133,77,169,40,141,4 

3,4,'174,192,29,172,193,29, 104,64,174 Ä „ „ 

18113 DATA 192,29,172,193,29,76,8,80,3,76,0,03,69,58,155,8,0,8,/6 

5,66,00,93,52,255,51,54,2 
5,56,60,62,78 


? 4 59,255,255,75,43,42,79,255,08,85 


18128 DATA 255,73,45,61,06,255,6/,255,5 
7,53,58,49,44,32,46,70,255,//,47,255 

18138 DATA 02,255,69,39,255,34,07,81,57,2o5,43,05,! 

-7--} £.0 '~ > 5 cr i 1 i 83 5 65 j ~1 

28188 DATA ACOLOR 3,CCHR*(©,DDATA @,FFÜR 3,SS0T0 0 
P0118 DATA HGOSUB 3,IINPUT 3,JDRAWTO @,KBRAPHICS @,LLIST © 

28120 DATA MLPRINT ©,NNEXT ©,OPADDLE(© ,PPLOT ©,QPOSITION © 

28138 DATA RRETURN©,SSOUND ©,TTHEN ©,UREftD ©,VSETCOLOR ©,WSTICK(£ 
28148 DATA XSTRIG <©, YSTR$ (@,2L0AD "D:©,30AVE "D:© 

28150 DATA 4LIGT "P:“©,5LIST "D:@ 

28160 DATA 0FOR 1=8 TO 3:SOUND I\0\0\0:NEXT I:SETCOLOR 2\ll\0sSEt 
COLOR 4\11\0:SETCOLOR 1\1\15© 

20178 DATA 6ENTER "D:©,©©©©© 

38848 DATA 8,224,2,225,2,0,29 
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Externe Tastatur -für den Atari 400 

Die Folientastatur des Atari 400 ist zwar nach einer kurzen 
Eingewöhnungszeit genauso schnell zu bedienen wie eine richtige; 
iijsr aber einmal für längere Zeit an einer Schreibfnaschinentastcu-ur 
gesessen hat, möchte diese nicht mehr missen. Es gibt im Moment 
zwar schon Tastaturen -für den nachträglichen Einbau, sie kosten 
aber ca. 143.- DM. Hier nun eine Anleitung zum Selbstbau einer 
solchen Tastatur. 

Notwendige Bauteile: 


2 24—polige Ic Fassungen 

min. 2 Meter 22 polioes Flachbandkabel 

Notwendiges Werkzeug: 

1 Lötkolben max. 33 Watt 
1 Abisolierzange 
1 Seitenschneider 
und Elektronik Lötzinn 

Die Tastaturen kann man oft fertig kaufen. Wenn möglich, 


sollte 


man eine wählen, die noch keinerlei Verdrahtung besitzt. Meistens 
sind diese Tastaturen aber bereits verdrahtet. In diesem Fall muss 
man sämtliche Leiterbahnen durchtrennen. 

Als erstes löst man sämtliche Kabel am Atari und entfernt das 
Modul': Nun werden die 4 Schrauben auf der Unterseite herausgedreht 
und dbr der Atari wieder umgedreht. Man öffnet nun die Modul klappe 
und hebt-das Oberteil soweit ab, bis man in der Lage ist, die Tas¬ 
tatur vom oberen Gehäuseteil zu lösen. Wie man nun sieht, ist die 
Tastatur über ein 22 poliges Flachbandkabel über einen Stecker 
mit der Hauptplatine verbunden. 

Nun nehmen wir uns die Ic-Fassungen vor. Da wir nur 22 Pins 
benötigen, sägen (oder schneiden) wir an einer Fassung 2 Pins ab. 
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Bis nun -folgende Verdrahtung ist aus der folgenden Zeichnung 
ersichtlich : Man lötet ein Kabel stück oben an der Fassung an; das 
andere Ende wird mit dem entsprechenden Pin der gegenüberliegenden 
Reihe verbunden und geht von dort zur externen Tastatur. Zu 
empfehlen ist hier der Einbau einer 25 poligen RS 232 Buchse im 
Atari. Man kann dann seine externe Tastatur jederzeit vom Computer 
trennen. Nun wird die Originaltastatur mit dem Ic- Sockel 

verbunden, an dem Gehäuse befestigt und der Atari wieder 

zugeschraubt. Natürlich sollte man sich vorher die Bedeutung der 
herausgelegten Kabel ( bzw. der Pins am RS 232 Stecker ) notieren. 
Die nun folgende Verdrahtung ist das schwierigste. Am besten geht 
man schrittweise vor; d.h. Sie verdrahten immer nur jeweils 4 oder 
5 Tasten und überprüfen diese dann bei eingeschaltetem Computer. 
Die Tasten müssen alle funktionieren, es darf auch kein dauerndes 
Repeat auftreten. Nach der erfolgreichen Verdrahtung, wird die 
Tastatur in ein geeignete Gehäuse eingebaut. Biese werden 

mittlerweile vom Elektron!kfachhandel angeboten. Man kann jetzt 
seine Tastatur jederzeit erweitern < z.B. durch Bau einer 
Zehnertastatur usw. / 

Es folgt nun der Schaltplan und die Belegung in Form einer 
Tabei1e. 
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Miero OOS 

Micro DOS ist eins Diskutility -für eine oder zwei 
Diskettenstationen. Micro DOS benötigt nur 3 Pages im RAM und 
ist somit permanent verfügbar. Und es verträgt sich mit dem im 
RAM befindlichen Programm. MEM.SAV kann somit vergessen werden. 
Wenn man DOS eintippt braucht man keine Angst mehr zu haben, dass 
das Bäsicprogramm gelöscht wird. Diese Utility kann auch ohne 
Cartridge betrieben werden. Das Micro DOS beinhaltet sämtliche 
DUP Funktionen ausser File- und Diskduplikation. Aber Micro DOS 
hat dafür noch einige andere Kommandos mehr : Hex oder Dez. RUN 
und einen ständig verfügbaren Hex.—Dez. und Dez.-Hex. Konverter. 
Damit kann endlich die lästige rumrechnerei entfallen. Natürlich 
kann man vom Micro DOS auch das normale DUF - einladen. 

Die Funktionen des Micro DOS sind am Anfang vielleicht etwas 
schwer zu behalten, aber Sie werden merken, dass diese Funktionen 
bald einfacher zu Handhaben sind als die DUP Funktionen. 

Folgendes müssen Sie bei der Eingabe beachten : 

Das Kommando für's Directory, Formatieren und die 
Schreibtunktionen benutzen D# und erwarten die Eingabe der 
Stationsnummer. Ein RETURN bedeutet Station Nr.l. Zum Formatieren 
erscheint ein '?' als Kontrolle. Hier ist ein 'Y' notwendig wenn 
man formatieren möchte. Die Funktionen die einen Filename 
benötigen zeigen ein 'FN?*. Der Device Name muss mit angegeben 
werden ( D:; Dl: oder D2: ). Die Renamefunktien benötigt nur 
einmal den Devicenamen ( D:TEST.COM,TEST.BAS). 
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Die Kommandos : 

DIR - Disketten Directory. Benötigt Eingabe der Stationsnr. 

1-4 oder RETURN -für 1 
REN - Rename. 

1 

* - Lock. File sperren 

Un* - Unlock. File entsperren 

FHT - Formatieren. Fragezeichen mit *Y' beantworten. 

EFxS - Erase. File löschen. 

CRT - Cartridge. Zurück zum Basic. 

LOD - binary load 

§RN - Run at adress. Hex. oder Dezimal 
WDS — Schreibe DOS.SYS ( kein DUP ) 

$>. - von Hex. nach Dezimal. Gib $ und # zusammen ein 
.>$ - von Dezimal nach Hex. Gib und # zusammen ein 

!DS - Geh ins Atari DOS ( DUP.SYS ) 

Das Micro DOS befindet sich in dem Autorun.Sys, den das folgende 
Programm auf die Diskette schreibt. Sie müssen dann natürlich das 
DOS 2.0S auf die Diskette schreiben. Denn sonst kann das Micro 
DOS nicht geladen werden. 



20 DIM H$(104) : TRAP 95:0PEN #1,8,0,'* D: AUTQRUN.SYS":FO 
R N=1 TO 16:READ H^:B=0 
30 FOR C=1 TO 99 STEP 2 

40 IF H$ (C ,C+2)=“END" THEN SOSUB 80:END 
5 0 A = 16*(ASC(H$( C) )-48-7*(ASC (H$(C)) >57) ) 

60 a=A+ASC (H$ (C+l )) -48-7* (ASC (H$ (C+l ) )>57) : B = B + A 
70 PUT # 1 , A :NEXT C:GOSUB 80:? "Zeile ";N*100;" ist in 
Ordnung.":NEXT N 

80 IF B<>VAL(H$(LEN(H$)—3)) THEN ? "ERROR IN ZEILE "; 
N* 1 00:STOP 

95 RETURN 

96 END 

100 DATA FFFFFC1C082020AE1E84F2888CE3028CE10284FFA280 
A00586F384F4A03A9848B9A71F20B21E68A88S10F3A9088D5A032 
0766200 

200 DATA 1EA004AD8005D9E21FF01C8810F8C944D06DA9068D5A 
0320741D206A1EA21020761E20701E10F6B9E71F48C9FEF009209 
51D5209 

300 DATA 68206C1E109CA93F20B21E20761EAD8005C959D08D20 
741D30E6A94420B21EA92320B21E20761EAD8005SDED1FSDF41FA 
0064896 

400 DATA B9EC1F91F3B810F860A94620B21EA94E20B21EA93F20 
B21E4C761EC957D01120741DC8B9F31F91F388D0FS206A1E10B1C 
9 4 C 5 V 6 5 

500 DATA D03485FF20951D4E5A03206A1E20991EA9FFC5D4D004 
C5D5F0F320B6DD2099* E20701F20E61DF0E5ADE302F008200517A 
9005814 

600 DATA 8DE30260C953D03720951DA0FFC8B1F3C92FD007EE5A 
03A99B91F3C99BD0EE206A1EA9FF85D485D520951E20ED1E20951 

E206602 

700 DATA B6DD20ED1E20951E20701F1039C940D00620ED1E6CD4 
00C943D0034C74E4C921D00EA940850CA915850D2040154C9F17C 
9244940 

800 DATA D00820081F20541F100AC92ED00620021F202D1F106F 
A903A210D00SA200A909D002A9059D4203A91E9D4803A9059D450 
3 A 9 3 7 4 0 

900 DATA 809D4403A9009D49032056E4302B60A90BD002A907A2 
109D4203A9029D4S03A9009D4503A9D4D0D9A90C10BA85D4A200A 
90B493S 

1000 DATA 9D4203A90110E3C003F0D1C088F0I59848A9C520B21 

E2044DA6835D420541F68684CFC1CA5FFF0F720E61DADE102F0EF 

20036297 

1100 DATA 17D0EAA94020B21E20761EAC8005C02EF006C024F00 
8D0BD2000D84CD2D92044DAA001B1F3C99BF01938E930C90A3002 
E9075889 

1200 DATA A20406D426D5CAD0F905D485D4C810E160A000A201A 
9F035D44A4A4A4A20481FA90F35D420481FCA10EB3021C90A3002 
67065311 ' 

1300 DATA 693091F3C86020AAD920E6D8A000B1F3C8C98030F92 
97F8891F3C8A99B91F74C701EE6D4D002E6D5A210A5E09D4403A5 
E1.9D-7399 

1400 DATA 450338A5D4E5E09D4803A5D5E5E14C8C1E204015A9F 
E8DE702A91F8DE802A9FC850AA91C850B603E9B9B5344A120243E 

AE205778 

1500 DATA 2E3EA4205344D7204E52C020444FCC205641D39B545 
2C320544DC6205352C5204D4ED2202A4ED5204B4CAA205249C49B 
52454936 

1600 DATA 2A554620212324FE44313A2A2E2A9B44313A444F532 
E5359539BA991850CA91F850D4C941FE202E302FE1FEND0000000 
00003710 



Wie der Atari sich selbst programmieren kann 


Wir werden jetzt etwa 


etwas 

lernen 5 dass Sie 

spater 

nicht 

mehr 

Es gibt 

sine Höglichksi1 5 

wie der 

Atari 

sich 

sn kann 

Man kann mit 
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ch erkl 
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best. P? üy? b'j“ sn Kann 

Möglichkeit z*B, Zeilen loschen, neue Programmzei1en schreiben 
und ahnl ichss# Diss ist. öxe ! schni k oss Bynasnx k K.eybouru* Wi!■ d 

mit FOKE 042,13 einqeschaltet» 

18 FOR 1 = 1888 TO 1588 STEP 18: ? OHR# (125) :POSITION 2,5;? I;-" REM 
Zeile «jls? :? "CONT" 

--?■» dho TTTnhi rs» oni-r IT» crflP 

*.£* 3 *_?-_? i s i '—«E >6 Ä. | VJ S f ur-.L. ^ J. V SS s s 

TiT* n-HL.-C 0 / 1 “ ■* “ * KiryT J 

i ur-.L- U —i. « ii.» ISS-A t 1 

Geben 31 e jetzt mal das nächsts Programrn ein- Wie Sie sehen ? hat 
Programm sich selbst 50 neue Frograrrimzeilsn geschrieben» 


3 der *„ Wcri" kj e ; s ^ werden 


Wenn nun die folgenden Zeilen gi 
Zeilen wieder gelcacht. 

10 FOR 1=1000 TO 1500 STEP 10:?CHR#(125):POSITION 2,5:? I:? "CONT" 

T 4 - —r 4 - ! k i r , Cr 
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er 1 i Sfcr 
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sinzulesende Nachricht auf den Bildschirm geschrieben. 


Dann 


mit POSITION 2,3 

1^1 eCiSi" öLfSi i 

a u t den br 

812,13 und STOP. 

Der Cursor 

X süt t nun cl 

CONT erreicht i 

tat. Die 

Anwsisangen 


wird unter die Nachricht CuNi geschrieben. Jetzt wird der Cursor 

den Börsen gesetzt. Nun PQKE 

nun den Screen entlang, bis er 

jie er zwischendurch 

durchl aüten hat, sind ■ jstzt eingelesen. Nachdem er t^ONT 

eingelesen hat, wird der Programmablauf fortgesetzt. Geben Sie 

nun noch das folgende Programm ein. Es ist nur ein Beispiel, 

wofür das Dynamik Keyboard hervorragend eingesetzt werden kann. 

13 DIM FORMELN(30)s? "Gib die zu zeichnende Formel ein. z.B. 

Y=SINCX)*40+53 INPUT FORMEL* 

23 ? CHR$(125):POSITION 2,5:? "129 “;FORMELN:? :? “COMT":POSITION 
2,0:PQKE 842,13:STOP 
30 PQKE 342,12 

180 GRAPHICS S:SETCOLOR 2,7,0:SETCOLOR 1,1,15:CQLOR 1:LIST 120 
113 DEG :FOR X=3 TO 1809 STEP 19 

123 REM Hier steht dann die eingegebene Formel 

133 PLOT X/3.15,Y:NEXT X 






Rettung von defekten Kassettenprogrammen 


Wer keine Diskettenstation besitzt, muss mit einigen gravierenden 
Nachteilen leben. Bei einer Biskettenstation dauert das Laden 
eines 16K Programms nur ca. 33 Sekunden. Ein Kassettenrecorder 
benötigt dafür immerhin noch stattliche 7 Minuten. Ausser diesem 
und noch einigen anderen Nachteilen, ist ein defektes Programm 
auf einer Kassette so gut Wie nicht mehr zu retten. Wir wollen 
hier einige Möglichkeiten aufzählen, welche Möglichkeiten ein 
verzweifelter Computerbesitzer zur Rettung hat. 

***Wenn man ein Programm von Kassette einlädt, stoppt dar Recorder 


automatisch nach dam 'Einladen. Meist wird jetzt angefangen zu 
spielen oder zu programmieren. Indes drückt die Gummirolle des 
Recorders munter gegen den Transportstift. Dazwischen befindet 


sich das Band. Jeder kann jetzt ausprobieren , wie das Band nach 5 


Min. aussieht. Man sieht einen Knick. Dieser Knick hat im Moment 
auf dieser Kassettenseite keine weiteren Folgen. Sobald aber das 
Programm gelöscht und ein neues Programm auf diese Seite geschrie¬ 
ben wird, passier t es: das Programm wird über den Knick im Band 
hinaus geschrieben. Dieser Knick kann, wenn er stark 
dass erfolgreiche Laden des Programms verhindern. Falls sich dazu 
noch auf der Rückseite der Kassette Programme befinden, sind diese 
natürlich auch.von diesem Knick betroffen. 

Tip Nr.1: 


k i fii 

Band 

genug 

i st, 

sich 

dazu 

sind 

d i ese 


Sofort nach dem Laden die STOP Taste drücken. 

Kassetten haben die unangenehme Eigenschaft, durch Reibung am 
Tonkopf, kleine Teilchen dort zurückzulassen. Verwendet man allzu 
billige Kassetten, kann es schon nach 5 Min. dazu führen, dass 
der Tonkopf völlig zugekleistert ist. Dann lässt sich kaum ein 
Programm noch laden oder abspeichern. 
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Tip Nr. 2: 

Regelmässig ( alle 2 Betriebsstunden und vor wichtigen Aufnahmen 
) der. Tonkopf mit Spiritus oder Alkohol reinigen. 
Reinigungskassetten sind rausgeschmissenes Geld. Achtung ! Kein 
Terpentin oder Verdünnung 2 um Reinigen nehmen. Am besten und 
billigsten ist immer noch Spiritus. Ausserdem wird am falschen 
Ende gespart, wenn man Billigkassetten kauft. 3.- DM sollte man 
schon hinlegen. Aufgrund der Sicherheit sollte man nur C 60 
verwenden. Die sogenannten Computerkassetten ( C iS o.ä ) sollte 
man nicht kaufen. Diese enthalten in der Regel das schlechteste 
Bandmaterial» 

Dem besten Rekorder kann es schon mal passieren, dass er 
Bandsalat produziert. Das Band ist dann so gut wie verloren. Wenn 
es gerissen ist, gibt es für das in diesem Teil befindlichen 
Programm keine Rettung mehr. 

Tip Nr. 3: 

Ist das Band nur zerknittsrt, kann man versuchen es zu bügeln. 
Dies ist oft erfolgreicher als es auf den ersten Blick aussieht. 
Stellen sie das Bügeleisen auf die kleinste Stufe und lassen Sie 
es nicht sulange auf einer Stelle. Dies kann auch angewendet 
werden, wenn sich ein Knick von der Andruckrolle auf dem Band 
D efindet. 

Oft gibt es Lesefehler von Fremdkassetten. Man bekommt eine 
Kassette? :• zugeschickt und wenig später macht sich Verzweiflung 
breit ; Das Programm lässt sich nicht laden. Es gibt zwei 
Möglichkeiten zur Rettung. 

Tip Nr. 4s 

Als erstes versucht man, den Tonkopf vom Recorder zu verstellen. 
Dazu befindet sich hinter dem Tonkopf eine kleine Schraube. Oft 
reicht nur eine halbe Umdrehung um das Programm laden zu können. 
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Die beste Stellung kann folgendermassen herausgefunden werden: 

Als erstes wird mit POKE 54318,52 der Motor vom Recorder ein¬ 
geschaltet. Nun wird die Kassette eingelegt und PLAY gedrückt. 
Nenn die Piepstöne, die jetzt ganz .leise aus dem Fernsehlaut- 
sprecher kommen, am lautesten sind, ist der Tonkopf richtig ein¬ 
gestellt. Versuchen Sie nun das betreffende Programm wieder zu 
wieder zu laden. Merken Sie sich bei dieser Prozedur aber unbe¬ 
dingt die Ausgangsstellung der Ionköpfschraube, damit sie 
Ihre eigenen Programme wieder laden können. 

Wenn das alles nichts hilft, gibt es noch die Möglichkeit, das 
betreffende Programm mit zwei Recordern zu kopieren. Man benötigt 
dazu zwei HiFi Kassettenrecorder. Man überspielt nun das Programm 
mit sehr hoher Aussteuerung auf eine andere Kassette. Auch hier 
muss beim abspielenden Recorder der Tonkopf eingestellt werden. 
Falls das immer noch nicht hilft, können Sie das Programm ab¬ 
schreiben und anfangen die Unordnung, die Sie mittlerweile verur¬ 
sacht ■haben, aufzuräumen. 

Wam ist es noch nicht passiert. Man hat seit 4 Stunden ein 
Programm eingetippt oder entwickelt und es abgespeichert. Spätere 
Ladeversuche werden mit einem hämischen ERROFi— 148 oder ERROR— 
133 quittiert. Da steht man nun und kann sein eigenes Programm 
nicht mehr laden. Die Ladefehler steigen übrigens eKponential mit 
der Wichtigkeit und Länge des Programms an. Meist ist es auch 
noch so-j dass der Computer wohl noch einen Teil einlädt, dann 
aber (vorzugsweise kurz vor Ende des Programms) einen Ladefehler 
erkennt. Das ärgerliche ist nun, dass das gesamte Programm 
verloren ist, obwohl ja immerhin ein Teil eingeladen wurde. 
Abhilfe schafft nun das folgende Programm. Nach dem Eingeben 
speichern Sie es erstmal ab. Nachdem Sie es haben laufen lassen, 
müssen Sie ? USRC1536) eingeben. Nun wird das defekte Programm 
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aingelegt, PLAY gedrückt und dann 2 um Laden noch RETURN gedrückt. 
Das Programm lädt jetzt das defekte Basicprogramm bis zum Fehler 
ein» Jetzt können Sie das Programm wieder vervollständigen. Even¬ 
tuell bringt die letzte Zeile den Computer durcheinander. Falls 
das der Fall ist, müssen Sie das Programm jetzt erstmal mit 
LIST !I C; “ ,3,E abspeichern. E ist hierbei dis letzte vollständige 
Zeile im Programm, Nun wird abgespeicherte Programm mit ENTER "C:“ 
wieder eingeladen. ( Vorher Atari aus—einschalten). 


Iz*- g-Zr *0? -eS «nrF tSrrf 1 


13 REM Basic /7e? 

23 REM von Bob Fine 

33 REM eutroten mit 7USRU536) 

43 TRAP 63:RESTORE : 1=8 

50 READ A; POKE 1536+1 , A: 1=1+1 : X=X+ft: GOTO 50 
63 IF X<>29124 THEN ? “DATA Fehler“:END 
73 TRAP 43333;NEW 

1303 DATA 134,165,128,133,3,165,129,133,1,23ß,1,162,16,169,3,157 
1313 DATA 66,3,169,251,157,68,3,169,6,157,69,3,169,4,157,74 
1323 DATA 3,169,128,157,75,3,32,86,228,48,75,163,3,140,255,6 
1033 DATA 32,237,6,48,65,72,32,237,6,48,59,170,134,172,255,6 
1343 DATA 24,131,128,153,128,3,233,138,131,129,153,128,0,230,192, 

14 

1350 DATA 233,219,165,143,133,142,133,144,133,14,165,141,133,143, 
133,145 

1363 DATA 133,15,32,237,6,48,15,163,3,145,0,230,3,166,0,208 
1070 DATA 2,230,1 
1083 DATA 


, 98,6,192,136,248,22,162,0,142,255,'6,189 


218,6,32,164,246,174, 


, 6,232,224,11,208,239,76,163,6 


1090 DATA 162,8,142,255,6,189,229,6,32,164,246,174,255,6,232,224 
1133 DATA 18,238,239,162,16,169,12,157,66,3,32,86,228,162,3,142 
1113 DATA 255,6,189,238,6,32,164,246,174,255,6,232,224,14,208,239 
1123 DATA 174,252,2,224,255,248,249,169,255,141,252,2,76,116,228, 
162 

1130 DATA j6,169,7,157,66,3,32,86,228,96,70,101,104,188,181,114 
dH43 DATA 32,32,32,32,155,75,111,109,112,188,181,116,116,155,80,3 

- 2 * 

1153 DATA 69,83,83,32,82,69,84,85,82,78,155,67,58,155,0,3 
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Druckerinterface -für Centronics Drucker 

Sa ziemlich jeder möchte wohl einen Drucker haben. Da die 
Ataridrucker nun nicht gerade das gelbe vom Ei sind und der Atari 
keine Centronics Schnittstelle besitzt,a steht dieser Anschaffung 


i iÖ*_i ä 


=xni gs= x *Ti wSQc* 


Nun 


gibt ss mittlerweile zwar schon 


Csn tr an icsinterf ace‘s z um Nach 


11 


sn ; 


äbaf d l trbis 


KJ ir- 


en 


. mmerhin 


ca. 300=— D!1= Ebenfalls werden auch schon Druckerinterf ace' s für 
Joystickports ang-eboten. Aber auch die kosten alle etwa ISS.- Dli. 


Desbalb wird hier 


öaup1an wer äffent1ich, 


ÜSrSSi i 


Verwirklichung Sie nur den Preis für die notwendigen Stecker 
kosten wird. Eventuell kommt da noch ein Ic zu, der aber nur 2.53 
DM kostet. Dieser wird 

schwach ist, um den Drucker anzusteuern. 


üliy , W'=ri 11 S daS Ul yPiai VOiTt ü-UiTt^niLSr ZU 


Um das Interface aniUsLcuern, 


ist eine spezielle Software nötig. 


Diese muss einmal eingeladen werden. Dann kann der Drucker mit den 
normalen Basic Kommandos angesteuert werden. Das Interface wird 
an die Joystickports i und 2 angeschlossen. Mit dem Interface 
können dis ersten 128 ASCII Zeichen übertragen werden. Braphik 
auszudrucken ist nicht möglich. Aber dies ist mit den meisten 
Interfaces, die an die Ports angeschlossen werden, nicht möglich. 

Anschiussbelgung der Joystickports 




9 IS 11 


D0 

D2 

D4 

D6 

Busy 

BND 


= 1 

= 5 
= 7 
= 9 


D3 

D5 

Strobe 
+5 Volt 


2 

4 

6 

3 

10 


PORT 1 


PORT 2 
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10 REM Funktioniert nur mit DOS 2.0 i/on Atari 
100 FOR 1=1664 TO 1776:READ X:PÜKE I,X:P=P+X:NEXT I 
105 IF P<>13142 THEN ? "DATA FehlerSTOP 
110 POKE 1777,PEEK(12) 

120 POKE 1778,PEEK(13) 

130 POKE 12,216:POKE 13,6 

140 ? "Druecke RESET um das Programm einzu- schalten" 

150 NEW 

160 REM Daten -fuer das Drucker Programm 

170 DATA 142,6,146,6,212,6,169,6,212,6,212^6,76,215,6,169,255,208 
,2,169,0,162,56,142,2 

180 DATA 211,141,0,211,169,60,141,2,211,169,255,141,0,211,160,1,9 
6,172,17,208,208,251,120,201,155 

190 DATA 208,2,169,13,9,128,141,0,211,32,140,6,41,127,141,0,211,1 
60,0,173,17,208,208,7,136 

191 REM ODER ANSTATT 41,127 -> 9,128 

200 DATA 208,248,160,138,88,96,160,1,88,96,160,146,96,160,0,185,2 
6,3,201,80,240,5,200,200,200 

210 DATA 208,244,169,128,153,27,3,169,6,153,28,3,76 


Falls Ihf 


einen Low Strobe benötigt müssen Sie 


i n 


190 die Zahlen 


« i 


j-3.L«I yHd I 


in 9,123 

rht 


andern 


:u Steuer 
UlSS Ibt aüCh Hül 
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Hier noch ein paar interessante POKE's 

Mit POKE 731,1 können XL Besitzer den Cursorton ausschalten 
Mit h’OKb 16,64 und s-’Ofc.E 4 ,d 4 wird die yRüftK laste ausgeschaltet 

Mit 7PEEK(20)/50+PEEK(19)*5.1+PEEK(iS)*1380.5 hat man eine ganau- 
gehende Uhr. 

Mit POKE 65,0 werden Disketten und Casssttengerausche ausgeschaltet 
POKE 77,0 sollte in einem Spiel ohne Tastatureingabe gelegentlich 
ausgeführt werden. (Damit die Farben sich nicht ändern) 
s© wird der Cursor ausgeschaltet 


Mit 

POKE 

t- JÜ. 5 su rtii ü 

Sv*-: 4 - 
•: Ji c 

dhi-t: 

755,4 hat 

Mit 

POKE 

838,166 un 


Bildschirm erscheint jetzt auf den Drucker. 

Mit PEEK(53279) werden die START usw. Tasten abgefragt. 

Mit POKE 54318,52 wird der Motor vom Kassettenrecorder eingeschal¬ 
tet. Man kann dann Musik über den Fernseher hören. 


Dic'3 i=t =>aibstverstö.ndlii_h kein vulIsiandiga^ Speichel listxwg. 

Die obenstehenden Zellen sind meist nur als kleine Aufbesserungen 
zu gebrauchen. Sie erhebt keinen Anspruch auf 9oiIstandxgkext. hu( 
sin vol1standiges Speicheriisting wurde in diesem Buch verzichtet, 
da es mittlerweile genügend Literatur auf dem Markt gibt, die so 
etwas enthalten. 


Super Färb Demos 

Auf der nächsten Seite finden Sie einige Demoprogramms, die Sie in 
Ihre eigenen Programme einbauen können. Geben Sie sie nacheinander 
ein und lassen Sie sich überraschen, was der Atari alles kann. 
Drücken Sie immer RESET bevor sie das Programm laufen lassen. 
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3 FOR 1=0 TO 57;READ XsPQKE 1536+1,X:NEXT I 

1 DATA 104,104,104,170,104,104,133,204,169,0,133,233,133,19,133,2 
0,169,3,133,205.230 

2 DATA 203,230,203,198,205,240,244,173,11,212 

3 DATA i0,24,101,203,141,10,212,141,10,212 

4 DATA 157,22,208,173,11,212,201,130,240,229,165,19,197,204,203,2 
27,96 

5 GRAPHICS 7;COLGR liPLGT 3,8:DRANTG 28,28:COLÖR 2:DRAWT0 48,48:C 
OLDR 3:DRAWTO 58,50 

6 FOR Y=1 TO 4;A=USR <1536,Y-Y*(Y=3),0.5):NEXT Y 


20 FOR F=1536 TO 1576s READ AsPOKE F,AsNEXT F 

38 DATA 72,169,0,141,255,5,238,255,5,173,255,5,141,18,212,201,189 
,288,243 

32 DATA 173,20,0,201,288,288,5,169,8,141,28,8,141,16,6,169,0,141, 
23,208,184,64 

40 POKE 512,8:POKE 513,6:POKE 54286,192 


18 D=PEEK(56ß > +256*PEEK(561);POKE D+2,PEEK(D+2)+128 
28 FOR F=1536 TO 1584:READ AsPOKE F,A:NEXT F 

38 DATA 72,169,0,141,255,5,238,255,5,173,255,5,141,18,212,281,189 
,208,243 

32 DATA 173,28,0,281,288,208,5,169,8,141,28,8,141,16,6,169,10,141 
,13,212,141,24,288,169,0,141,23,288,104,64 
48 POKE 512,0:POKE 513,6:POKE 54286,192 


18 D=PEEK(568)+256+PEEK(561);POKE D+2,PEEK(D+2)+128 
15 FOR F=1536 TO 1578;READ AsPOKE F,AsNEXT F 
28 DATA 72,138,72,174,255,5,138,141,10,212,141,24,208,238 
73,255,5,281,3,248 

30 DATA 3,76,3,6,169,58,141,255,5,184,178,134,64 
43 POKE 512,0sPOKE 513,6:POKE 54236,192 


255,! 


4 

Ä 


13 D=PEEK(568)+256+PEEK(561):POKE D+2,PEEKC D+2 >+128 
28 FOR F=1536 TO 1578:READ A:POKE F,A:NEXT F 
38 DATA 72,169,8,141,255,5,238,255,5,173,255,5,141, 


18,212,141,24 




288,281,189,288,248 

32 DATA 173,28,8,141,2,6,185,189,141,19,6,104,64 


40 POKE 512,0:POKE 


513,6:POKE 


54286,192 


13 D=PEEK(560)+256*PEEK(561):POKE D+2,PEEK(D+2)+128 
28 FOR F=1536 TO 1573:READ A:POKE F, AsNEXT F 

38 DATA 72,169,8,141,255,5,238,255,5,173,255,5,141,10,212,141,24, 
288,281,189,288,248 

32 -DATA 173,28,8,141,19,6,169,3,141,18,212,141,24,288,104,64 
48 POKE 512,8;POKE 513,6:POKE 54286,192 


8 GRAPHICS 2;POKE 710,0;FOR F=0 TO 11:7 #6;"DER ATARI COMPUTER":N 
EXT F 

13 D=PEEK(563)+256+PEEK(561):POKE D+2,PEEK < D+2) +128 
23 FOR F=1536 TO 1573:READ AsPOKE F,A:NEXT F 

30 DATA 72,169,8,141,255,5,238,255,5,173,255,5,141,10,212,141,22, 
208,201,189,208,240 

32 DATA 173,20,0,141,19,6,169,0,141,10,212,141,22,208,104,64 
48 POKE 512,3;POKE 513,6:POKE 54286,192 
58 END 
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Riesen Tastaturbuf fer 

Der AtariComputer hat leider sin kleines Manko. Es wäre 
praktisch, wenn sr einen grösseren Tastaturbuhter hätte. Wie sxe 
sicher schon gemerkt haben, speichert der Computer immer di s 


2 ul etst gedrückte Taste. Manchmal wäre es 


s äbet rec; it 


iraktisch, 


wenn er mehr als nur ein Zeichen speichern könnte. Mit der 
•folgenden Programm ist es möglich. 


30000 REM FRA esen Buf T er 

338i@ DATA 184,173,8,2,14i,96,6,173,9,2,l4I,Y/,6,l&9,0,l-H,l^,^A^ 

1 n-fSj 1 io 1 4"! fi ? 

•j A .' »fi ^ r ij -_5 .C. sj X. i J, ^ f J~ 

33028 DATA 169,6,141,9,2,169,98,141,36,2,169,6,141,37,2,169,1V2,1 

41,14,212,169,0,133,284 _ _ _ __ 

38838 DATA 133,285,88,96,173,9,218,281,159,248,36,152,72,1/3,252, 
2,281,255,240,19,164,204,192,180 

38848 DATA 248,9,238,284,288,173,9,210,153,143, 6 ,184,168,104,64,* 

65.284.197,285,288,231,184,168,76 __ 

33858 DATA 95,6,173,252,2,281,255,288,35,16b,284,197,205,24^, 20 ,2 

38,235,164,284,192,128,1/6,15,164 _ _ 

38860 DATA 205,192,128,176,9,185,143,6,141,252,2,76,98,228,± 6,,0, 
133,284,133,285,76,98,228 
33878 IF PEEK(521)=6 THEN STOP 

38888 FOR 1=0 TO 142:READ N:X=X+NsPOKE 1536+1,NsNEXI I 
38898 IF X<>18389 THEN ? "DATA Fehler”:STOP 
38183 ? USR(1536) 


Farbspeicherung 

Fast jeder ändert die Bi 1 dschi rmfarbe bevor er arvfängt zu 
Programm! ersn. Kaum einer setz t sich dem Hellblau, das der 
gi i dschi rm beim einschalten des Computers zeigt, für lungere i_eit 
aus. Jeder Hat seine Lieb!ings-farbe ( z.B.SETCOLOR 2,8,0 usw.) . 
Leider muss man ■es aber jedesmal nach Drucken von REoEs neu 
eintippen. Deshalb hier die Abhilfe, Das Programm funktioniert 
nicht mit OSS A+ DOS» 

18 FOR F=1536 TO 1548;READ AsPOKE F,A:NEX7 F 

11 ? "Hintergrundfarbe s” 5 sINPUT As? "Helligkeit s”;:INPUT B:? “Z 

eichenhel1igkeit INPUT C;D=A*16+B 

12 POKE 1537,D:POKE 1542,C 

28 DATA 169,8,141,198,2,169,0,141,197,2,76,64,21 
33 POKE 12,8;POKE 13,6 




